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].
when i open my file in vim, i confirm that each line is indeed tab
delimited. do i have an error in my syntax?

thanks -charles

Reply via email to