while (/req=(\d+)/g) { print OUT ("$1\n"); }