Shell Programming and Scripting

if part of a larger script local-ize the global perl variables so they do not mess around with any other parts of the program that might use them (if any):

Code:

{
   local @ARGV = ($chk_file);
   local $^I = '.bak';
   while (<>){
      s/ {2,}/|/g;
      print;
   }
}

Thanks kevin.. appreciate ur replies.. will try them out.. thanks a lot...

Hi,

This is the sample data i have ...

Some kind of text 1234567891 abcd February 14, 2008 03:58:54 AM 0.00 descr lmnop
Some kind of text 1234567891 abcd February 14, 2008 03:58:54 AM 0.00 lmnop
Some kind of text 1234567891 abcd February 14, 2008 03:58:54 AM 0.00

Im looking for a code that does something like this ..

Some kind of text 1234567891|abcd|February 14, 2008 03:58:54 AM|0.00|descr|lmnop
Some kind of text 1234567891|abcd|February 14, 2008 03:58:54 AM|0.00||lmnop
Some kind of text 1234567891|abcd|February 14, 2008 03:58:54 AM|0.00||

Thanks!

If the sample data is what you described previously the code I posted should work. Is the data you just now posted different? You should put code tags around your data so it retains formatting.

too funny, I would recommend sed for this too.