Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
for my $field (sort keys %swip_data) {
    printf qq(%-12s => "%s"\n), $field, $swip_data{ $field };
}
  2. or download this
    02_org_name  => ""
03_org_addr1 => ""
...
19_poc_email => ""
20_ip_addr   => ""
21_netname   => ""