Shell Programming and Scripting

Hi All,

I am fresh to perl and had been using shell scripting in my past experiences.

In my part of perl program, i am trying to run a application command ccm stop, which should give some string output as the result. The output (error or sucess) has to be returned to an exisiting log file. Below is the piece of code

@cmstop = `ccm stop`;
open (LOGFILE, ">>$logfile");
print LOGFILE $cmstop;
close (LOGFILE);

But the output is not captured in the logfile. Any help/clue is highly appreciated

because you are using $cmstop. check how you declared the variable cmstop.

Thanks for ur reply.. I tried correcting @cmstop as well.. it doesn't work

@cmstop = `ccm stop`;
open (LOGFILE, ">>$logfile");
print LOGFILE @cmstop;
close (LOGFILE);

The actual ccm stop command returns the below answers

C:\Documents and Settings\use>ccm status
Sessions for user abcd:

No sessions found.

Current project could not be identified.

And i am expecting the output in the $logfile too.

have you defined $logfile?

what are the contents of the logfile after this command ??

BTW you are reading input in array and print a variable ???

try

Code:

chomp ( $cmstop = `ccm stop` ) ; 
open (LOGFILE, ">>$logfile");
print LOGFILE $cmstop;
close (LOGFILE);