Subversion Repositories sysadmin_scripts

Rev

Rev 24 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

#! /usr/bin/perl -w

my $toFind = shift;

if ( $toFind ) {
   print "ssh names\n";
   print `grep $toFind /etc/ssh/ssh_config`;
   print "\nvpn names\n";
   print `ls /etc/openvpn | grep $toFind`;
} else {
   print "You must enter one thing to look for, ie findname pci\n";
}