## my $fortune = `fortune`; ##
## my ($time1) = localtime; my $time2 = localtime; print "$time1 / $time2\n";