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