or download this
printMessage("\n*Launching browser for node $node...");
if ($node =~ s/^id:\/\///) { $url = $perlmonksURL_id . $nod
+e; }
elsif ($node =~ s/^node_id=//) { $url = $perlmonksURL_id . $nod
+e; }
...
elsif ($node =~ /^http:/) { $url = $node;
+ }
elsif ($node =~ s/^\/+//) { $url = $perlmonksURL_base . $nod
+e; }
else { $url = $perlmonksURL_node . $nod
+e; }