Re: Checking filenames?

[Jas]

No, your right, it does drop the zero.  I am going to test your solution 
to the problem. Seeing as I should be the one claiming insanity on not 
learning perl earlier.  =)
Jas

Wc -Sx- Jones wrote:
Jenda?

This is the partial original post -

Jas wrote:

Wouldn't this be better?

my $year = "";
my $month = "";
my $day = "";
if($file =~ /^(\d{4})(\d{2})(\d{2})-www.tar.gz$/) {
  $year = $1;
  $month = $2;
  $day = $3;
my $chk = "$month - 1";


Here - this is weird =)

"03" in numerical context is 3.

File name was 20040301 - collapses to 200431 -
Not a match IMHO.
foreach($file ! $chk) {
  $ftp->delete($file); }
??? Not sure but I am going to test it out....


Maybe I am totally confused - I have been working on WebSphere.  Yes, I 
plead complete insanity.

-Bill-
__Sx__________________________________________
http://youve-reached-the.endoftheinternet.org/


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>