Hi Jonathan,
Thanks. With your idea, I am able to capture the
return value inside the perl script.
Thanks alot.
/Regards
Ambikesh
--- Jonathan Paton <[EMAIL PROTECTED]> wrote:
> > I want to capture the return value of a "C"
> program
> > called inside a perl script. How to do this?
>
> perldoc -f system
>
> To find out that you need $? and/or ($? >> 8).
>
> Jonathan Paton
>
> --
> #!perl
> $J=' 'x25 ;for (qq< 1+10 9+14 5-10 50-9 7+13 2-18
> 6+13
> 17+6 02+1 2-10 00+4 00+8 3-13 3+12 01-5 2-10 01+1
> 03+4
> 00+4 00+8 1-21 01+1 00+5 01-7 >=~/ \S\S \S\S /gx)
> {m/(
> \d+) (.+) /x,, vec$ J,$p +=$2 ,8,= $c+= +$1} warn
> $J,,
>
__________________________________
Do you Yahoo!?
Yahoo! Small Business - Try our new resources site!
http://smallbusiness.yahoo.com/resources/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
