in reply to Translate military paygrades to rank salutations

And the corrections for the Air Force
%usaf = (   'E-1'     => 'Airman Basic',
            'E-2'     => 'Airman',
            'E-3'     => 'Airman First Class',
            'E-4'     => 'Senior Airman',
            'E-5'     => 'Staff Sergeant',
            'E-6'     => 'Technichal Sergeant',
            'E-7'     => 'Master Sergeant',
            'E-8'     => 'Senior Master Sergeant',
            'E-9'     => 'Chief Master Sergeant',
            'W-1'     => '',
            'W-2'     => '',
            'W-3'     => '',
            'W-4'     => '',
            'W-5'     => '',
            'O-1'     => 'Lieutenant',
            'O-2'     => 'Lieutenant',
            'O-3'     => 'Captain',
            'O-4'     => 'Major',
            'O-5'     => 'Lieutenant Colonel',
            'O-6'     => 'Colonel',
            'O-7'     => 'General',
            'O-8'     => 'General',
            'O-9'     => 'General',
            'O-10'    => 'General',
            'O-11'    => 'General of the Air Force');

[download]

TStanley
--------
War is an ugly thing, but not the ugliest of things. The decayed and degraded state of moral and patriotic feeling which thinks that “nothing is worth war” is much worse. The person who has nothing for which he is willing to fight, nothing which is more important than his own personal safety, is a miserable creature and has no chance of being free unless made and kept so by the exertions of better men than himself. -- John Stuart Mill

In Section Cool Uses for Perl