Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

print the status of the file

by vrempire (Sexton)
on Aug 07, 2000 at 08:09 UTC ( #26498=perlquestion: print w/ replies, xml ) Need Help??
vrempire has asked for the wisdom of the Perl Monks concerning the following question:

hi guys,howdidu I want your help regarding the file.I wanted to print the status of the file like the time the file is accessed,modified,created etc?How I can do that?

Comment on print the status of the file
Re: print the status of the file
by btrott (Parson) on Aug 07, 2000 at 08:56 UTC
    stat. Or File::stat.

    But you can't get the created time, because Unix doesn't store that information.

    my($accessed, $modified) = (stat "/foo/bar")[8, 9];
    Or, using File::stat,
    use File::stat; my $s = stat "/foo/bar"; print scalar localtime $s->atime;
    You should get the idea.
Re: print the status of the file
by lolindrath (Scribe) on Aug 07, 2000 at 17:46 UTC
    these might also help some, below is an example and then all the options you have to use.
    if ( -e $File ) { #it exists }


    -A Age of file in days since last access -B binary file -C age of file in days since last inode change -M Age of file in days since last modification -O Is the file owned by the real user ID? -R Is the file readable by the real user ID? -S if the file a socket? -T is it a text file? -W is the file writable by the real user ID or real group? -X is the file executable by the real user id or real group? -b is it a block speical file? -c is it a character special file? -d is the file a directory? -e does the file exist? -f is it a plain file? -g does the file hav the setgid bit set? -k does the file have the stick bit set? -l is the file a symbolic link -o is the file owned by the effective user id? -p is the file a named pipe? -r is the file readable by the effective user id? -s returns the size of a file, with zero referring to an empty file -t is the filehandle opened by a TTY(terminal)? -u does the file have the setuid bit set? -w is the file writable by the effective user or group ID? -x is the fie executable by the effective user or group ID? -z is the file size zero?
    (this comes from Perl: the complete reference)

    --=Lolindrath=--

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://26498]
Approved by root
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (6)
As of 2014-09-23 07:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (211 votes), past polls