Select Code to Download

#!/usr/local/bin/perl
use strict;
...
        if(exists($dow[$i]) && !defined($dow[$i])){ print "\$dow[$i]\t
+exists\t not defined\n"; }
        if(exists($dow[$i]) && defined($dow[$i])){ print "\$dow[$i]\te
+xists\t defined\n" ;}
        }