Help for this page

Select Code to Download

Select or download this

$ perl -wMstrict -MData::Dump
"a"=~/(?!a)/p;
...
__END__
("a", "", "")
("s", "", "tart")