Making more from a one line shell script

 #!/usr/bin/perl open (FILE, $ARGV[0]) or die "Error: Cannot open file.\n"; @line = ; close FILE; foreach (@line) { chomp; print "echo \"" . "------------------" . "\"" . "\n"; print "echo \"" . "started - `date`" . "\"" . "\n"; print "echo \"" . $_ . "\"" . "\n"; print $_ . "\n"; print "echo \"" . "finished - `date`" . "\"" . "\n"; print "\n"; }