in reply to undef line in an array

try something like
#!usr/gnu/bin/perl -w use strict; my $file = "pathname/to/acl/user/file"; my $user; open (ACL,"<$file") || die $!; while($user = <ACL>) { chomp $user; next if !$user; $user = "$user.mydomain.com"; #add domain for smtp print $user; #to get a listing } close(ACL);
Greetz
Beatnik
... Quidquid perl dictum sit, altum viditur.

Replies are listed 'Best First'.
Re: Re: undef line in an array
by Dalin (Sexton) on Jun 26, 2001 at 00:17 UTC
    Thanks guys. That did the trick. Bradley p.s. Beatnik... you have to tell me what the latin means. Where ever there is confusion to be had... I'll be there.