Help for this page

Select Code to Download

Select or download this

print FH Data::Dumper->Dump([\%data], ['*data']);

Select or download this
```
my $ret = do $file
```

Select or download this

sub DESTROY  { _write ($_[0]) } #not overidable!