Help for this page

Select Code to Download

Select or download this

use Modern::Perl;

...
        say "Wrong kind of input: $val";
    }
}

Select or download this

Found: 12, 01
Found: 1333, 011111
...
This is an array or hash ref: Don't process
This is an array or hash ref: Don't process
Found: 12, 01