On Sun, 1 Jul 2001 [EMAIL PROTECTED] wrote:
> open FH, $virt or die "Cant open virtuser file $!\n";
>
> while (<FH>) {
> $each = $_;
> chomp $each;
> @entry = split /\/t/, $each;
> print "$entry[0]\n";
> if ( $entry[0] eq $name ) {
> $dest = $entry[1];
> }
> }
> close FH;
>
> i am not certain why, but when i run this script, it doesnt seem to be
> splitting a line on the \t character, rather it just feeds me the entire
> line back as $entry[0].
Because you are not splitting on the \t character, you are splitting on a
literal '/t'. You want:
@entry = split /\t/, $each;
-- Brett
http://www.chapelperilous.net/btfwk/
------------------------------------------------------------------------
With a gentleman I try to be a gentleman and a half, and with a fraud I
try to be a fraud and a half.
-- Otto von Bismark
