$_=~s/ö/&ouml\;/gi; in Gross und Kleinscrift

[Jon]

Hallo,

Habe da ein Code eingebaut. Klein wird in oe umgewandelt,
aber grosses Ö nicht.

Vieleicht wisst Ihr einen Rat?

Vielen Dank im Voraus
Jon

[suit]

Habe da ein Code eingebaut. Klein wird in oe umgewandelt, aber grosses Ö nicht.

$_=~s/ö/ö/gi

Damit ersetzt du ö oder Ö case insensitive gierig durch ö

Vieleicht wisst Ihr einen Rat?

Treibe keine Scherze mit uns sondern poste deinen tatsächlichen Code.

[Jon]

Jon,

Verstehe nicht die Betrachtungsweise:Warum ich Scherze treiben soll,
das ist der Tatsächliche code.

Jon

[ChrisB]

Hi,

Verstehe nicht die Betrachtungsweise:Warum ich Scherze treiben soll,
das ist der Tatsächliche code.

Weil der gezeigte Code ganz sicher nicht das macht, was du behauptet hast:

Klein wird in oe umgewandelt

MfG ChrisB

[Jon]

Also,

$_=~s/ö/ö/;
$_=~s/Ö/Ö/;

wollte ich in einem code setzen, und dachte das gi am ende groß und klein
erkennt, so das mit $_=~s/ö/ö/gi; Ö und ö jewels in ö  oder Ö umgewandelt wird.
Aber es geht nicht.

MFG
Jon

[Gunnar Bittersmann]

@@Jon:

nuqneH

so das mit $_=~s/ö/ö/gi; Ö und ö jewels in ö  oder Ö umgewandelt wird.
Aber es geht nicht.

Wie auch? Wo steht in deinem Code was von 'Ö'?

Und warum auch?

Qapla'

[MudGuard]

Hi,

$_=~s/ö/ö/gi
Damit ersetzt du ö oder Ö case insensitive gierig durch ö

Nix gierig. global.

cu,
Andreas

[Gunnar Bittersmann]

@@Jon:

nuqneH

Vieleicht wisst Ihr einen Rat?

Eher ein Rätsel.

Also lass mich raten: Du willst 'ö' in 'ö' und 'Ö' in 'Ö' umwandeln? Das ist wohl nicht sinnvoll.

Qapla'

[Beat]

Habe da ein Code eingebaut. Klein wird in oe umgewandelt,
aber grosses Ö nicht.

Vieleicht wisst Ihr einen Rat?

Es ist generell Unsinn HTML-Entitäten zu erzeugen, wenn ein utf8 Encoding angesagt wäre.

Aber hier die Antwor, warum /i agnostisch ist, solange das pragma utf8 nicht verwendet wird:

  
#!perl  
use warnings;  
use strict;  
use constant { NL => "\n" };  
  
BEGIN {  
    use CGI::Carp qw(carpout);  
    open(LOG, ">error.txt")  or  die "Unable to append to error.txt: $!\n";  
    carpout(*LOG);  
}  
  
{  
  use utf8;  
  "Ö" =~ /ö/i and print "MATCH mit utf8",NL;  
  #matcht  
}  
  
"Ö" =~ /ö/i and print "MATCH ohne utf8",NL;  
  #matcht nicht  
  
<>;  

Die Antwort: ohne utf8 pragma sieht Perl nur Bytes, weiss also nicht von Case für Multibyte Chars.
utf8 kann pro Block ein und ausgeschaltet werden.

mfg Beat