- or download this
Sample
PP: (899040) Jane Smith
Output
PP: 899040 Jane Smith
- or download this
my $filename = "filename";
open my $file, '<', $filename;
@fileinput=<$file>;
...
if($test=~s/\(|\)//g)
{ print $test;
}
- or download this
the output appeared to be
PP: 8945, it didn''t get the 6 digits number