# file1.pl
my $size = -s $ARGV[0];
my $time = -M $ARGV[0];