replace space with delimiter in whole file -perl - Page 2

KevinADC · #1 (**permalink**) 02-14-2008

Code:

open(FH_TMP,"<","$chk_file");
open(OUT,">>",tmpfile);
while (my $line = <FH_TMP>)
{
$line =~ s/ {2,}/|/g;
print OUT $line;
}
close(FH_TMP);
close(OUT);

could be done faster using perls inplace editor:

Code:

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

will cretae a backup of the original file first. (.bak extension)

KevinADC · #2 (**permalink**) 02-14-2008

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;
   }
}

meghana · #3 (**permalink**) 02-14-2008

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

meghana · #4 (**permalink**) 02-19-2008

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!

More UNIX and Linux Forum Topics You Might Find Helpful
Thread	Thread Starter	Forum	Replies	Last Post
Find/replace to new file: ksh -> perl	McLan	Shell Programming and Scripting	1	05-16-2008 04:14 AM
read space filled file and replace text at specific position	COD	Shell Programming and Scripting	6	04-21-2008 06:40 AM
replace the last delimiter	jisha	Shell Programming and Scripting	4	01-28-2008 06:26 AM
replace delimiter : with '\001' in unix data file	spandu	Shell Programming and Scripting	4	04-25-2006 09:51 AM
field delimiter with a space or more	uphamtn	UNIX for Dummies Questions & Answers	3	05-15-2003 05:22 PM

Thread Tools	Search this Thread
Show Printable Version Email this Page	Search this Thread: Advanced Search
Display Modes	Rate This Thread
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode	Rate This Thread: