Opened by xAmp at 2009-09-23 14:49
User since
2006-01-27
3891 Artikel
HausmeisterIn
2006-01-27
3891 Artikel
HausmeisterIn
Lösung ohne Regex:
edit: PS: ist das wirklich eine Perl6-Spezifische Frage? Ansonsten würd ich eine Verschiebung nach Perl-Allgemein vorschlagen.
Last edited: 2009-09-23 15:06:51 +0200 (CEST)
Code (perl): (dl
)
1 2 3 4 5 6
my $t = "tldmfmyvkif4dwhbvysdrtaysdf"; my @neu = ( grep { $_ ne "y" } split //, $t )[0..12]; print "@neu"; __END__ t l d m f m v k i f 4 d w
edit: PS: ist das wirklich eine Perl6-Spezifische Frage? Ansonsten würd ich eine Verschiebung nach Perl-Allgemein vorschlagen.
Last edited: 2009-09-23 15:06:51 +0200 (CEST)
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!