RE: Help in && control statement

2006-07-28 Thread Anoop Kurup
Hi Tom, Yes that worked. Thanks a lot. Cheers, Anoop -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Tom Phoenix Sent: Friday, July 28, 2006 8:26 PM To: Anoop Kurup Cc: beginners@perl.org Subject: Re: Help in && control statement On 7/28/0

Help in && control statement

2006-07-28 Thread Anoop Kurup
Hi, Can somebody explain to me what is the syntax error in the following code: 20 sub func() 21 { 22 my ($retension_period, $file_list) = @_; 23 my $file; 24 25 while(defined($file = glob("$file_list"))) 26 { 27-s $file && -M $file > $ret

Implement find command

2006-07-27 Thread Anoop Kurup
Hi, Can u help me in the coding of the Find function. I need to customize find so that it accepts values of type "*.sh" etc with last modification of time of +"$time" and of "$file_type" file type. If such a file is found within the "$base_dir" directory then that file should be deleted. Cheers,