$record =~ s/[\.\-]//g;

if it is a '.' or a '-' replace it with nothing.
Actually, I don't even think the [] is necessary, so it could just be:
$record =~ s/\.\-//g;


-----Original Message-----
From: Scott [mailto:[EMAIL PROTECTED]]
Sent: Monday, January 07, 2002 4:02 PM
To: [EMAIL PROTECTED]
Subject: global substitution


Hi all:

I have two files that I am reading into an array, I want to substitute a 
period and a dash,
actually I want to remove them completely.  Here is my code:

while (my $record = <QUOTEP>){
my $policies = <POLTEP>;
my @fields = split( /\t/, $record );
my @policies = split( /\t/, $policies );

When I need a record I call it from the array @fields[5], etc.  But need do 
the removing of
... and - before I display them.

Thanks,

-Scott


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

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

Reply via email to