Wednesday, May 17, 2006

How to find out a specific string in a set of files

Go to the topmost level and then run this comand

 

find . -exec grep -l “mankad” ‘{}’ \; > /user/x0032906/Public/Files_containing_string_mankad.csv


 

Posted by Babai at 11:25:01 | Permalink | No Comments »

Friday, May 5, 2006

To find the Modules of perl installed on a server

 

#!/usr/local/bin/perl

use ExtUtils::Installed;
my $instmod = ExtUtils::Installed->new();
open (MYFILE, ‘>>/user/x0013158/Public/ModulesInstalled_in_www2_data.txt’);
foreach my $module ($instmod->modules()) {
my $version = $instmod->version($module) || “???”;
       print  MYFILE “$module — $version\n”;
}

close (MYFILE);

Posted by Babai at 10:52:39 | Permalink | No Comments »