Select Code to Download

use strict;
use warnings;
...
else {
    print "did not match $string\n";
}

my @array = (
    "received 480 response",
...
did not match received 485 response
matched received 486 response
did not match received 487 response