diff --git a/ptouch.pl b/ptouch.pl index eb7c6dd..291e13b 100755 --- a/ptouch.pl +++ b/ptouch.pl @@ -20,7 +20,7 @@ if (defined $opts{n}) { die "Neither -n[ew] nor -e[dited] are defined!"; } -my $timestamp = localtime; +my $timestamp = time; my $fname = shift @ARGV; tie my @fharr, 'Tie::File', $fname or die $!;