Ah, the push arguments are in wrong order, my memory played a trick with me. The correct order would be:

push @wanted, $line if $line =~ /^SELECT poid/;
[download]