Select Code to Download

% perl -MO=Concise -e 'print "Hello, $world!"'
a  <@> leave[1 ref] vKP/REFC ->(end)
...
-                 <1> ex-rv2sv sK/1 ->6
5                    <#> gvsv[*world] s ->6
7              <$> const[PV "!"] s ->8

% pugs -c -e 'print "Hello, $world!"'
{ Statements
...
        ,"<interactive>" (line 1, column 1)
    )]
}