Hidden features of Perl?

by

The flip-flop operator is useful for skipping the first iteration when looping through the records (usually lines) returned by a file handle, without using a flag variable:

while(<$fh>)
{
  next if 1..1; # skip first record
  ...
}

Run perldoc perlop and search for “flip-flop” for more information and examples.

More Related Contents:

  1. How can I convert my shell script to Perl? [closed]
  2. search using perl one liner within a file [closed]
  3. How to re-direct the contents to a file instead of printing it to terminal
  4. How do I remove duplicate items from an array in Perl?
  5. What is the difference between library files and modules?
  6. How do I read in the contents of a directory in Perl?
  7. How can I pass command-line arguments to a Perl program?
  8. How do I efficiently parse a CSV file in Perl?
  9. How can I generate all permutations of an array in Perl?
  10. How can I install CPAN modules locally without root access (DynaLoader.pm line 229 error)?
  11. OpenSSL DH Key Too Small Error
  12. Manual installation of a Perl Module
  13. @ARGV is empty using ActivePerl in Windows 7
  14. ImageMagick Command-Line Option Order (and Categories of Command-Line Parameters)
  15. Perl Dereferencing Syntax
  16. How to extrace pg_backend_pid from postgresql in shell script and pass it to another process?
  17. What exactly does Perl’s “bless” do?
  18. What is the difference between `$this`, `@that`, and `%those` in Perl?
  19. Why are use warnings; use strict; not default in Perl?
  20. What is the difference between `read` and `sysread`?
  21. Why is the Switch module deprecated in Perl?
  22. How to use shell variables in perl command call in a bash shell script?
  23. In Perl, what is the difference between accessing an array element using @a[$i] as opposed to using $a[$i]?
  24. How do I use symbolic references in Perl?
  25. “inappropriate ioctl for device”
  26. In Perl, how can I check from which module a given function was imported?
  27. How can I verify that a value is present in an array (list) in Perl?
  28. Perl Subroutine Prototyping — The correct way to do it
  29. Why do hash keys have different order when printing?
  30. How can I manually interpolate string escapes in a Perl string?

Leave a Comment