#!/usr/bin/perl
use strict;
use warnings;
#use 5.010;

my %folderhash2 = (
   '1005' => 'SG',
   '1007' => 'NA',
   '1010' => 'Global',
   '0' => 'None',
   '1006' => 'Link',
   );

foreach my $folderMap2 (sort keys %folderhash2) {
    printf "%-8s %s\n", $folderMap2, $folderhash2{$folderMap2};
}

##</code><code>##


vmias62409 /v/region/na/appl/msim/imasg_env/data/imasgdev/bin/notify/signOffPageOnDev 23$ ./temp.pm
0        None
1005     SG
1006     Link
1007     NA
1010     Global

##</code><code>##


my %folderhash2 = (
   '1005' => 'SG',
   '1007' => 'NA',
   '1010' => 'Global',
   '0' => 'None',
   '1006' => 'Link',
   );

foreach my $folderMap2 (sort keys %folderhash2) {
    printf "%-8s %s\n", $folderMap2, $folderhash2{$folderMap2};
}

##</code><code>##


[Fri Apr 28 07:13:49.446884 2023] [cgid:error] [pid 17180:tid 47883746555648] [client 138.20.34.173:26768] malformed header from script 'signoff.cgi': Bad header: 0        None, referer: