How does double arrow (=>) operator work in Perl?

by

The => operator in perl is basically the same as comma. The only difference is that if there’s an unquoted word on the left, it’s treated like a quoted word. So you could have written Martin => 28 which would be the same as 'Martin', 28.

You can make a hash from any even-length list, which is all you’re doing in your example.

Your Readonly example is taking advantage of Perl’s flexibility with subroutine arguments by omitting the parenthesis. It is equivalent to Readonly(my $infilename, "input_56_12.txt"). Readonly is a function exported by the Readonly module which takes two arguments: a reference, and a value. The internals of Readonly are worthy of another question if you want to understand them.

Here’s an example of using it as a comma in an unexpected way:

$ perl -e 'print hello => "world\n"'
helloworld

More Related Contents:

  1. Why do hash keys have different order when printing?
  2. Operators in Perl [closed]
  3. What’s the difference between a hash and hash reference in Perl?
  4. What pseudo-operators exist in Perl 5?
  5. How can I combine hashes in Perl?
  6. Iterating hash based on the insertion order?
  7. What does =~ do in Perl? [closed]
  8. What does !! (double exclamation point) mean?
  9. Why doesn’t Perl’s each() iterate through the entire hash the second time?
  10. What decides the order of keys when I print a Perl hash?
  11. Failing to install MIME::Base64 using cpan [closed]
  12. Declaring a 2D coordinate in Perl / C / C++ [closed]
  13. Difference of Two Arrays Using Perl
  14. How can I output UTF-8 from Perl?
  15. Multiline search replace with Perl
  16. How do I “use” a Perl module in a directory not in @INC?
  17. How can I dynamically include Perl modules without using eval?
  18. Why do my Perl tests fail with use encoding ‘utf8’?
  19. What is the difference between my and local in Perl?
  20. Perl read line by line
  21. What is the difference between Perl’s ( or, and ) and ( ||, && ) short-circuit operators?
  22. How do I change, delete, or insert a line in a file, or append to the beginning of a file in Perl?
  23. Obtain a switch/case behaviour in Perl 5
  24. How do I extract the domain out of an URL?
  25. Why does $foo->{bar} autovivify but %$foo doesn’t?
  26. How do I tell what type of value is in a Perl variable?
  27. Why do Perl variables need to start with $, %,@ (sigils)?
  28. Print lines from one file that are not contained in another file
  29. Perl DBD::Oracle Module installation
  30. Explain the deviousness of the Perl “preamble”

Leave a Comment