From: "Catalin Florin RUSSEN" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, March 20, 2002 11:37 AM
Subject: [rlug] Re: need some perl script help
> (scuze de outlook express 6)
In cazul ala ar trebui sa-mi cer si eu scuze; anyway, mailul precedent
n-a fost wrap-at.
> deci, se poate un mic ajutor?
Pai cica nu tre' sa-i dai peste omului, ci sa-l inveti sa pescuiasca :).
Iaca o mica secventa de cod (care ar face pe Perl-gurus sa rida cu
felurite parti anatomice) care listeaza ctime pentru *.conf din /etc:
#!/usr/bin/perl
use strict;
use File::stat;
my $filename;
my $dir = '/etc/';
my $mask = '*.conf';
my $sb;
foreach $filename (split(/\n/, `ls $dir$mask`))
{
$sb = stat($filename);
print $filename, "\t", scalar(localtime($sb->ctime)), "\n";
}
---
Send e-mail to '[EMAIL PROTECTED]' with 'unsubscribe rlug' to
unsubscribe from this list.
