Select Code to Download

Select or download this

#!/Perl/bin/perl -w

...
        DEFAULT_BLOCK_TYPE: {print "Invalid block type specified!\n\n"
+;}
    }
}

Select or download this

Use of uninitialized value in string eq at C:\Documents and Settings\x
+xx\Desktop
\deasm.pl line 32, <STDIN> line 3.
Use of uninitialized value in string eq at C:\Documents and Settings\x
+xx\Desktop
\deasm.pl line 36, <STDIN> line 3.
Use of uninitialized value in string eq at C:\Documents and Settings\x
+xx\Desktop
\deasm.pl line 40, <STDIN> line 3.