Opened by Ionit at 2014-09-14 22:50
User since
2006-01-27
3870 Artikel
HausmeisterIn
2006-01-27
3870 Artikel
HausmeisterIn
Hi,
dafür gibt es verschiedene Möglichkeiten:
1. per Regex
2. per substr() und index()
3. per split()
dafür gibt es verschiedene Möglichkeiten:
1. per Regex
Code (perl): (dl
)
1 2 3 4 5 6
my $text = "Hallo Welt."; # ersetze alles ab dem ersten Leerzeichen durch einen Leerstring $text =~ s/ .*//; print ">$text<\n";
2. per substr() und index()
Code (perl): (dl
)
1 2 3 4 5 6 7
my $text = "Hallo Welt."; # index sucht die Position des Leerzeichens von rechts ab Position 0 # substr überschreibt dann in $text ab der gefundenden Position den Reststring mit dem zugewiesenen String substr($text, index($text, ' ', 0) ) = ''; print ">$text<\n";
3. per split()
Code (perl): (dl
)
1 2 3 4 5 6
my $text = "Hallo Welt."; # splitte an Leerzeichen in 2 Teile; verwende nur den ersten Teil $text = ( split / /, $text, 2 )[0]; print ">$text<\n";
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!