##
$stamp=`/bin/date +%Y%m%d%H%M%S`;
...
$file="/u01/scripts/logs/$stamp.tapes";
open( MYFILE, ">>$file");
####
use POSIX;
my $stamp = strftime( "%Y%m%d%H%M%S", localtime );
print ">>$stamp<<\n"; # look ma! no line-feed!
####
/bin/cat 20070925133445
.tapes
####
perl -e '$_ = `echo foo echo bar`; print'
perl -e '$_ = `echo foo\necho bar`; print'