Hi Timothy
Thank you,(sounds like a silver bullet J ) will give it a try and post the results. Regards, Satya From: timothy adigun [mailto:2teezp...@gmail.com] Sent: 27 January 2012 16:46 To: Nemana, Satya Cc: Rob Dixon; beginners@perl.org Subject: Re: How to compile just the current perl module, ignoring all the other included modules what you want I mean! thanks On Fri, Jan 27, 2012 at 5:45 PM, timothy adigun <2teezp...@gmail.com> wrote: Hi Satya, On Fri, Jan 27, 2012 at 5:29 PM, Nemana, Satya <snem...@sonusnet.com> wrote: Hi Rob All I got from this exercise is ./startAutomation syntax OK and a complete print of the startAutomation perl file with the fully qualified function names, all the variables used in the program at the beginning of the program. >From the time command output, as used in the command "time /ats/bin/perl -w -MO=Deparse ./startAutomation " I have 92.765u 110.414s 3:24.11 99.5% 0+0k 0+0io 0pf+0w How do I know module wise, how much time perl is taking for compiling each of the modules and where perl is spending time in the compilation? I think the module you need is Benchmark. Please do on CLI: perldoc Benchmark. Am sure you get want to want! How do I enable more verbose in the compilation or execution of the program? Thanks, Satya -----Original Message----- From: Rob Dixon [mailto:rob.di...@gmx.com] Sent: 27 January 2012 15:19 To: beginners@perl.org Cc: Nemana, Satya Subject: Re: How to compile just the current perl module, ignoring all the other included modules On 27/01/2012 12:58, Nemana, Satya wrote: > Hi Shawn > > How do I use this option of -MO=Deparse when executing a perl script > with an embedded #! Prompt? > > Our scripts start with the line > #!/ats/bin/perl -w > > I tried adding the parameters here, but got the following errors > > Too late for "-MO=Deparse" option at ./startAutomation line 1. > BEGIN { $^W = 1; } > > Then there are a host of other environment variables set before > executing the functions in the modules by a call to > > unless ( my $return_val = do $test_suite_list_file ) { > die "ERROR: Couldn't parse test suite file \"$test_suite_list_file\": $@\n" if $@; > die "ERROR: Couldn't 'do' test suite file \"$test_suite_list_file\": $!\n" unless defined $return_val; > die "ERROR: Couldn't run test suite file > \"$test_suite_list_file\": $!\n" unless $return_val; > > is there other way of using the option -MO=Deparse?? No, the module has to be mentioned on the comnmand line, but you can say /ats/bin/perl -w -MO=Deparse prog.pl which will have the desired effect. You can also add the additional files in the same command if necessary using the -f option like this /ats/bin/perl -w -MO=Deparse -f file1.pl -f file2.pl prog.pl Also you should be using use warnings; instead of -w in the #! line. HTH, Rob -- Tim -- Tim
