Hi!,

I know how to do this in C, but how to in Perl?  I want to chop the
following string:

   if ((bulk>0) || (sub>0)||(chuckcon>0)) conpin (smu3, bulk, sub, chuckcon,
0);

Apart so that all is left is:

   if ((bulk>0) || (sub>0)||(chuckcon>0))

The key word to break on is 'conpin', but it will change in each line.

Thanks,

Jerry

Reply via email to