Help for this page

Select Code to Download

Select or download this

$ perl -MO=Deparse -M'5;print "foo"' -ne '}{print "bar"'

...
{
    print 'bar';
}