Help for this page

Select Code to Download


  1. or download this
    my ($type,$num) = $nodeloc =~ /^([aAeEsS])(\d{1,2})$/;
    if (defined $type and defined $num)
    ...
        return qq([$prefix://$nodeloc])
      }
    }