I am using Perl 5.8.8. The code posted above works fine for me without any warnings. Can any one tell me why it is happening like that?
#!/usr/bin/perl use strict; use warnings; open FILE, ">hoser.txt"; my @file_info = stat(FILE); close FILE; print join "\n", @file_info; my $timestamp = pop( @file_info ); print my $date = localtime $timestamp; __END__ 2054 1280089 33188 1 636 100 0 0 1233569457 1233569587 1233569587 4096 0Thu Jan 1 05:30:00 1970
In reply to Re: stat and localtime - take2
by lakshmananindia
in thread stat and localtime - take2
by neutron
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |