Since $count is nowhere used again, why increment it each time just for the sake of reading primary key. Just use a boolean "read_Primary_Key" (default false) and then true after reading the first line.
-- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/