Dear All,
Thanks for your concerns and suggestions.
The idea of $mpath i.e., when I execute this command: `/vobs/package134/inttools/modules/unixtools/srce/whichPath $m :: I will get the output as /vobs/package183/psappat/modules/<module name, that is having the $m value in the foreach loop>, So now I want to cd into this module, and then cd into confm folder, Here in this path/location, My intention is to check whether post_REFERENCED_to_EXPERIMENTAL file exists? and if so, find the link attached to this file. My concern is still I am not able to CHDIR into module. Please suggest.
Modified Script:
use Cwd qw(chdir);
open(LS, "/home/raghvens/52xxmodulelist.txt") or die $!;
@modlist = <LS>;
@mpath = " ";
foreach $m (@modlist)
{
print "\nProcessing $m .. \n";
$mpath = `/vobs/package134/inttools/modules/unixtools/srce/whichPat
+h $m`;
print "\nModule Path is $mpath \n";
chomp($mpath);
$path = `chdir $mpath`; # or die "Can't cd into module path:$mpath
+\n";
print "\nCurrent Path is $path";
if(! chdir($mpath)){
print "\n cannot change the working directory \n";
}
`chdir confm`;
$file = "post_REFERENCED_to_EXPERIMENTAL";
@output = system ("ls -l $file");
print "YES, Link is present" if $_ =~ /\-\>/ ;
}
This is the output of the script:
Processing atp
..
Module Path is /vobs/package183/psappat/modules/atp
post_REFERENCED_to_EXPERIMENTAL: No such file or directory
Current Path is
Processing atpctm
..
Module Path is /vobs/package183/psappat/modules/atpctm
post_REFERENCED_to_EXPERIMENTAL: No such file or directory
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.