Ned Cunningham wrote:
> 
> Can anyone give me a hand please?
> I have a file
> 
> James T Nobel
> James T. Nobel, Jr.
> James and Kathy Nobel
> James  T Nobel
> James             T Nobel
> 
> I am trying to replace the spaces with a single space
> 
> My code so snippet is:
> 
> $cuname = $data[53];
> 
> $newcuname = /" "+/" "/$cuname;


( my $newcuname = $data[53] ) =~ tr/ //s;

( my $newcuname = $data[53] ) =~ s/ +/ /g;



John
-- 
use Perl;
program
fulfillment

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to