system "update";
my $datestr=`date`;
print "Date output: $datestr\n";