Select Code to Download

#!/usr/bin/perl
use warnings;
...
{
print "Inside else \n\n";
}

Use of uninitialized value in pattern match (m//) at ./tt.pl line 8, <
+STDIN> line 1.