... if ( my @arr = ($line) =~ m/itag=(.+?)&url=(.+?=.+?)(?=,itag.+?)/ig ) { print join "\n" => @arr; } ...