chomp(@ARGV = ); # put each line of FILE into @ARGV and remove the trailing \n while(<>) # for each filename in @ARGV { print s! <--/--a8300--> .*? <--/a8300-->. !!igr; }