Select Code to Download

#!/usr/bin/perl
use warnings;
...
    print "vlan $vlan\nifconfig $ifconfig\n";
    print "WRONG!!!\n" if $vlan != $ifconfig;
}