On 10/4/05, Jay Savage <[EMAIL PROTECTED]> wrote:
>
> > >
> > > I want this file not to grow more than 50KB.
> > > How can I go about it. I been stuck here.. this above script will not
> do
>
>
Thanks a lot for all that gyan. :)
Cheers,
Umesh
"Because it's up-side down".
"Why is that?"
"It makes replies harder to read."
"Why not?"
"Please don't top-post." - Sherm Pendley, Mac OS X Perl list
On 10/4/05, Stephen Kratzer <[EMAIL PROTECTED]> wrote:
> Chances are that the file size will never equal exactly 500 bytes. You cou
Chances are that the file size will never equal exactly 500 bytes. You could
use >= instead of eq, and it should work. Also, you don't have to close
STDERR before reopening it, and in cases where you want to do numeric
comparisons, use == instead of eq. Hope that helps a little. Also, it might
Perhaps the more idiomatic way to do what you want
would be:
use strict;
my $directory = shift;
chdir $directory or die "Unable to change to directory: $!\n";
while (<*>) # this automagically loops through the current dir
{
# I think you're trying to get last accessed date
print -A, "\n"
I have found
Thanks
-Message d'origine-
De : COLLINEAU Franck FTRD/DMI
[mailto:[EMAIL PROTECTED]]
Envoyé : lundi 10 décembre 2001 11:08
À : '[EMAIL PROTECTED]'
Objet : Stat function
Greetings,
I have the following code:
opendir (INFO,"l:/01_informatique") || die " impossible d'ouvri
> -Original Message-
> From: COLLINEAU Franck FTRD/DMI/TAM
> [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, November 20, 2001 3:31 AM
> To: [EMAIL PROTECTED]
> Subject: Stat function
>
>
> Hi!
>
> I have the following code:
>
> #!/usr/bin/perl -w
> open(FIC,">/home/collineau/Perl/Programm
