Help for this page

Select Code to Download

Select or download this

 while ( my $line = <IN> ) {
     $line =~ s/^\x{FEFF}//;    
     print OUT $line;

Select or download this
```
s/^\x{FEFF}//g
```