clean your room :)

my $x = 30:30:3a:31:64:3a:69:2d:6f; #in hex
Bareword found where operator expected at - line 1, near "3a"
        (Missing operator before a?)
Bareword found where operator expected at - line 1, near "3a"
        (Missing operator before a?)
Bareword found where operator expected at - line 1, near "2d"
        (Missing operator before d?)
Bareword found where operator expected at - line 1, near "6f"
        (Missing operator before f?)
__END__
syntax error at - line 1, near "30:"
Execution of - aborted due to compilation errors.
[download]