Hell-O!
Mir ist keine Perl-Funktion ala PHP strstr bekannt.
Selber machen ist angesagt:
sub strstr {
my $string = $_[0] ? shift : 'Syntax error: strstr() called with less then one argument.';
my $substr = $_[1] ? shift : undef;
defined($substr) ? return substr($string, index($string, $substr)+1) : return $string;
}
Das wäre eine Sub, die in etwa das tun sollte, was strstr tut.
Siechfred
--
Ich bin strenggenommen auch nur interessierter Laie. (molily)
Siechfreds Tagebuch || Falle Aufteilungsbescheid || RT 221 Erfurt-Altstadt i.V.
Ich bin strenggenommen auch nur interessierter Laie. (molily)
Siechfreds Tagebuch || Falle Aufteilungsbescheid || RT 221 Erfurt-Altstadt i.V.