Select Code to Download

#!/usr/bin/perl

...
mainmenu();
startup();
MainLoop();

sub begin_menus{
    $scan_menu->command(-label => 'Nmap Scan',
...
}

nmap_start();