chop is chopping off the last letter

vtprogrammer has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
RE: chop is chopping off the last letter by vroom (His Eminence) on Jul 05, 2000 at 23:49 UTC
Use chomp instead of chop. The chomp manpage has a nice description of what it does. vroom \| Tim Vroom \| vroom@cs.hope.edu	[reply]
Re: chop is chopping off the last letter by plaid (Chaplain) on Jul 05, 2000 at 23:51 UTC
I don't quite understand your question. You're chopping a variable, but you don't want it to chop off the last letter? If you don't want it to chop off the last letter, then why are you chopping at all? The way to fix it would just be to not chop. If what you want is to get rid of any trailing newlines, but not do anything if there aren't any, take a look at chomp, which is a more intelligent version of chop.	[reply]
Re: chop is chopping off the last letter by cwest (Friar) on Jul 05, 2000 at 23:52 UTC
Help? Suggestions? Don't use `chop()`! Change your code to say the following and you won't have problems any more. (not that one any how.) `my( $userid, $pword ) = split /\\|/, $record;` [download] Oye.. -- Casey	[reply] [d/l]
Re: chop is chopping off the last letter by Anonymous Monk on Jul 12, 2000 at 16:28 UTC
The problem is probably caused by reading from a file - you get lines (read into @records) as follows: user1\|pass1\n user2\|pass2\n user3\|pass3 note the last line doesn't have a \n at the end, hence chop chops the last char off rather than the \n Again, the easiest way is to just use chomp rather than chop. Otherwise you could hack it by doing # add /n to last record my $hackyvar = pop @records; $hackyvar .= "\n"; push @records, $hackyvar; (you can probably do this in one line but I prefer readable code...) and then do your foreach loop after that. Hacky, but it works. But use chomp anyway...	[reply]