Help for this page
#!/usr/bin/perl ... } EOC main;
#!/usr/bin/perl ... printf "success, system command executed.\n"; return 0; }