Re: loop problem

open (FH, "filtered.txt");
open (IN, "information");


while (<IN>) {
chomp $_;
/images\/(\d+)/;
$sample = $1;
                   while (<FH>){
                                 /(\d+)/;
                                print "loop\n";
                                }
              }
[download]

Comment on Re: loop problem Download Code

Replies are listed 'Best First'.
Re^2: loop problem by derby (Abbot) on Jun 14, 2005 at 14:24 UTC
`open (FH, "filtered.txt"); open (IN, "information"); while (<IN>) { chomp $_; /images\/(\d+)/; $sample = $1; while (<FH>){ /(\d+)/; print "loop\n"; } seek( FH, 0, 0 ); }` [download] -derby	[reply] [d/l]