Hi all,

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?

Thanks,

Jan
-- 
How many Microsoft engineers does it take to screw in a lightbulb? None. They just 
redefine "dark" as the new standard.

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to