in reply to Re: Storing Info in a text File
in thread Storing Info in a text File

Or a little more compact: 
use List::Util qw(max);
my @users = grep /\S/, <DATA>;
my $max = max /^(\d+)/, @users;
++$max;
print @users, "$max|Rudif|scribe\n";

[download]

-- Randal L. Schwartz, Perl hacker

Replies are listed 'Best First'.
Re: Re: Re: Storing Info in a text File
by Rudif (Hermit) on Mar 11, 2001 at 01:37 UTC
    But it costs an extra trip to CPAN.

    Would you know offhand what this diagnostic (while installing Scalar-List-Utils-1.02) points to - wrong kind or build of Perl? I have the AS build 623 here on Win2k. I did not try to investigate - the package also has a pure Perl version.

    Util.c
Util.xs(183) : error C2198: 'Perl_Irunops_ptr' : too few actual parame
+ters

    [download]


    Rudif
[reply]
[d/l]

In Section Seekers of Perl Wisdom