in reply to New functions?

<at> is really "@". I saw it too in MJD's-mail. It is probably an artefact of not being able to use "@" in some mail messages

my  @rows = split /\n/, $_;

Split what is found in the magic variable $_ on linefeed into the array @rows.

my $x = pop  @rows;

"pop" the top element of the array @rows into scalar variable $x

is(scalar( @$result), $n_courses, "test $.: one room per course");

"is" is a function in the Test::More module (to build an automated test suite). It checks if the value of scalar( @$result) is equal to $n_courses.

CountZero

"If you have four groups working on a compiler, you'll get a 4-pass compiler." - Conway's Law

Replies are listed 'Best First'.
Re: Re: New functions?
by Fletch (Bishop) on Jun 02, 2004 at 01:28 UTC

    More likely it's an overzealous attempt at obfuscating email addresses in a web mail archive.

[reply]
      Then it must probably be some "automated obfuscator" as the "@" here is not used in e-mail addresses and the s/@/ <at> / was blindly applied.

      Surely another victim of the anti-spam overkill. Sometimes you wonder whether the cure is worse than the illness.

      CountZero

      "If you have four groups working on a compiler, you'll get a 4-pass compiler." - Conway's Law

[reply]
[d/l]

In Section Seekers of Perl Wisdom