Select Code to Download

if ($in{username} =~ /^(\[a-zA-Z]{2})/ || ' ') {
     $dirtype = $1 || 'other';
}

my $dirtype;
if ( $in{username} =~ /^([a-zA-Z]{2})$/ ) {
...
} else {
      $dirtype = 'other';
}