Select Code to Download

while (<DATA>)
{
...
art1012387
stuff458353
other432610

while (<DATA>)
{
...
        print "No match: $_\n";
    }
}