system "perl $time.pl";