Select Code to Download

#!/usr/bin/env perl

...
    warn Data::Dumper->new([\%+],[qw(*+)])->Deepcopy(1)->Indent(1)->Ma
+xdepth(3)->Sortkeys(1)->Dump(),q{ };
    };
__DATA__

%+ = (
  'package' => 'package Fee;'
...
);
  at Fi_01.t line 44.