printMessage("\n*Launching browser for node $node..."); if ($node =~ s,^id://,,) { $url = $perlmonksURL_id . $node; } elsif ($node =~ s,^node_id=,,) { $url = $perlmonksURL_id . $node; } elsif ($node =~ s,^cpan://,,) { $url = $perlmonksURL_cpan . $node; } elsif ($node =~ s,^google://,,) { $url = $perlmonksURL_google . $node; } elsif ($node =~ m,^http:,) { $url = $node; } elsif ($node =~ s,^/+,,) { $url = $perlmonksURL_base . $node; } else { $url = $perlmonksURL_node . $node; }