Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: ssh wrapper

by radiantmatrix (Parson)
on Mar 28, 2006 at 18:33 UTC ( [id://539774]=note: print w/replies, xml ) Need Help??


in reply to ssh wrapper

I did something similar to this, but with a shell script. I created a directory 'ssh' in my home dir, with a script ssh.sh, which I symlink to the short names of the servers I wish to attach to. I didn't care about shortname->longname expansion because tab completion was fast enough (for boxes that didn't end in one of the local domains anyhow).

#!/bin/bash if [ "$1" == "" ]; then ssh $1@$0 else ssh $0 fi

So, when I want to connect to myhost.org with the username 'radmat', I can just:

$ ~/ssh/myhost.org radmat

When I can't remember usernames, I make an entry in ~/.ssh/config to remember it for me. Hostnames are expanded by tab completion, and this saves me a ton of time.

Perl equivalent, if you want:

#!/usr/bin/perl if (!defined $ARGV[0] || $ARGV[0] eq '') { exec('ssh',$0) } else { exec('ssh',"$ARGV[0]\@$0") }
<-radiant.matrix->
A collection of thoughts and links from the minds of geeks
The Code that can be seen is not the true Code
I haven't found a problem yet that can't be solved by a well-placed trebuchet

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://539774]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others admiring the Monastery: (4)
As of 2025-06-12 19:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?
    erzuuliAnonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.