Select Code to Download

$ perl -d it.pl
Default die handler restored.
...
  use O inhibit_exit to avoid stopping after program termination,
  h q, h R or h O to get additional info.  
  DB<1>

perl -MO=Deparse it.pl
my $bar = {'foo', ()};
it.pl syntax OK