in reply to pipe perl
Hi mouser13,
say
substr+lc crypt(qw $i3 SI$),4,5
You also have a syntax error -- the 2 print statements are missing the terminal semi-colon:
should be:print old "$LAST_NAME\t$FIRSTNAME\n" print old "\t$ID_NUM\t$BOOK\n"
The second one isn't technically mandatory, since it is followed by the brace, but it's good programming practice.print old "$LAST_NAME\t$FIRSTNAME\n"; print old "\t$ID_NUM\t$BOOK\n";
Edit: The reply above from VinsWorldcom did not originally have the necessary semi-colon ';', but he has now quietly added it to make it appear that his code was correct from the beginning. However, it's still better programming practice (as I mentioned) to add it to both lines.
|
---|
In Section
Seekers of Perl Wisdom