ptouch: use POSIX time
This commit is contained in:
parent
6b3cb1470e
commit
c6fd874bc5
|
@ -20,7 +20,7 @@ if (defined $opts{n}) {
|
||||||
die "Neither -n[ew] nor -e[dited] are defined!";
|
die "Neither -n[ew] nor -e[dited] are defined!";
|
||||||
}
|
}
|
||||||
|
|
||||||
my $timestamp = localtime;
|
my $timestamp = time;
|
||||||
|
|
||||||
my $fname = shift @ARGV;
|
my $fname = shift @ARGV;
|
||||||
tie my @fharr, 'Tie::File', $fname or die $!;
|
tie my @fharr, 'Tie::File', $fname or die $!;
|
||||||
|
|
Loading…
Reference in a new issue