Help for this page
#!/usr/bin/perl ... strict 'refs' is off strict 'subs' is off strict 'vars' is off