Jan Eden wrote: > > Hi all, Hello,
> I tried to stuff the following two lines into one, but did not succeed: > > my($teilnehmer) = $eingabe =~ m/(?<=Teilnehmer:\n\n)(.+)/s; > my(@teilzeilen) = split /\n/, $teilnehmer; > > This does not work: > > my @teilnehmer = $eingabe =~ m/(?<=Teilnehmer:\n\n)(.+)/s; > > This does neither: > > my @teilnehmer = split /\n/, $eingabe =~ m/(?<=Teilnehmer:\n\n)(.+)/s; > > Any ideas? my @teilnehmer = map /.+/g, $eingabe =~ m/(?<=Teilnehmer:\n\n)(.+)/s; John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
