kästchen in dem 0095 steht zu etwas brauchbarem umwandeln

[CPAN]

das 0A keine ahnung

Zeilenvorschub

――――

Wenn's dir nur darum geht, diesen einen Fehler in deiner Quelldatei zu verbessern, benutze Perl von der Kommandozeile als Streameditor. Zur Erklärung der Schalter siehe perldoc perlrun.

perl -i.bak -C -0777 -Mcharnames=full -ple's/\x95/\N{BULLET}/g' 0095.txt

Das ganze noch einmal etwas ausführlicher als Programmdatei:

use strict;  
use warnings FATAL => 'all';  
use charnames qw(:full);  
use autodie;  
  
my $preisliste;  
{  
    open my $p_handle, '<:encoding(UTF-8)', '/home/lxuser/Desktop/firma/dist_to_exa/quell.txt';  
    local $/;  
    $preisliste = readline $p_handle;  
    close $p_handle;  
}  
  
$preisliste =~ s/\x95/"\N{BULLET}"/g;  
  
{  
    open my $p_handle, '>:encoding(UTF-8)', '/home/lxuser/Desktop/firma/dist_to_exa/anticode_out.txt';  
    print {$p_handle} $preisliste;  
    close $p_handle;  
}