Problems? Is your data what you think it is? | |
PerlMonks |
|
use warnings;_ _ _ _ _ ($SIG{__WARN__}=sub{' use strict; | |_ ___| |_| |_ ___ ___ _ _ _ ___ ___| |_| |'&&print pop=~/\](.*)[ use rtfm; | . | -_| _| _| -_| _| | | | . | _| | . |]i.*\$(.*)\[/;exit},' no whining; |___|___|_| |_| |___|_| |_____|___|_| |_|___|',eval'@orld[_]')