![]() |
|
|
google unix.com
|
|||||||
| Forums | Register | Forum Rules | Links | Albums | FAQ | Members List | Calendar | Search | Today's Posts | Mark Forums Read |
| Shell Programming and Scripting Post questions about KSH, CSH, SH, BASH, PERL, PHP, SED, AWK and OTHER shell scripts and shell scripting languages here. |
More UNIX and Linux Forum Topics You Might Find Helpful
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Get return value from PERL script calling from KSH | ucbus | Shell Programming and Scripting | 1 | 03-01-2009 08:30 AM |
| Calling Expect script in Perl... | ramkriz | Shell Programming and Scripting | 4 | 08-21-2008 01:11 AM |
| Calling Winzip from perl script | MobileUser | Shell Programming and Scripting | 5 | 04-04-2007 04:51 AM |
| calling a shell script from perl | gurukottur | Shell Programming and Scripting | 3 | 10-05-2006 12:48 PM |
| calling a C executable from inside a Perl script | mark_nsx | Shell Programming and Scripting | 3 | 10-07-2005 06:49 AM |
![]() |
|
|
LinkBack | Thread Tools | Search this Thread | Rate Thread | Display Modes |
|
|
|
||||
|
calling problem in perl script
Hi , Here is my piece of code-- Code:
main();
sub main
{
$result = GetOptions ("LogDir=s" => \$LogDir,
"Summary" => \$Summary,
"Indiviual=s" => \$Individual ,
"Diagnostics=s" => \$Diagnostics,
"Prefix=s" => \$Prefix,
"All" => \$All,
"help" => \$help);
usage_help() if($help);
usage_help() unless($Prefix);
usgage_help() unless($LogDir);
if($LogDir)
{
die "Log dir '$LogDir' doesn't exist" unless -d $LogDir;
}
$glob_path = "$LogDir/${Prefix}*";
@log_paths = glob $glob_path or die "No files found in '$glob_path'";
printf "log files = \n";
print @log_paths;
printf "\n";
if($Summary)
{
process_summaryreport ();
}
if($Individual)
{
if($Individual == "ArcotID")
{
ArcotID_Authentication(@log_paths);
}
}
}
I am calling the script as-- Code:
C:\Perl Script>perl summaryreport_latest_working.pl --LogDir=. --Prefix=arcotweb --Individual=ApricotID It does not show me any output. I think the problem lies here but not sure. Code:
if($Individual)
{
if($Individual eq "ArcotID")
{
ArcotID_Authentication(@log_paths);
}
}
Individual can take diffrent arguements one of them is ApricotID, other may be QnA and OTP or all, so depending on the arguement i want to call the respective function. Thanks NT ---------- Post updated 07-01-09 at 01:33 AM ---------- Previous update was 06-30-09 at 11:16 AM ---------- Hi, I got it working, Thanks anyway. Thanks nt Last edited by Yogesh Sawant; 07-01-2009 at 03:31 AM.. |
![]() |
| Bookmarks |
| Thread Tools | Search this Thread |
| Display Modes | Rate This Thread |
|
|