Why can’t I match my string from standard input in Perl?

by

The statement $name = <STDIN>; reads from standard input and includes the terminating newline character “\n“. Remove this character using the chomp function:

print "What is your name?\n";
$name = <STDIN>;
chomp($name);
if ($name eq "Jon") {
  print "We have met before!\n";
} else {
  print "We have not met before.\n";
}

More Related Contents:

  1. Failing to install MIME::Base64 using cpan [closed]
  2. Declaring a 2D coordinate in Perl / C / C++ [closed]
  3. how to use multiple IP’s in perl script
  4. Why can’t Perl find my file that is in ClearCase?
  5. How can I use a variable as a variable name in Perl?
  6. Difference of Two Arrays Using Perl
  7. How can I output UTF-8 from Perl?
  8. What’s the difference between a hash and hash reference in Perl?
  9. Multiline search replace with Perl
  10. How do I “use” a Perl module in a directory not in @INC?
  11. How can I process options using Perl in -n or -p mode?
  12. How can I hook into Perl’s print?
  13. How can I dynamically include Perl modules without using eval?
  14. Why do my Perl tests fail with use encoding ‘utf8’?
  15. What is the difference between my and local in Perl?
  16. Why does my Perl script exit with 137?
  17. Perl read line by line
  18. What is the difference between Perl’s ( or, and ) and ( ||, && ) short-circuit operators?
  19. How do I change, delete, or insert a line in a file, or append to the beginning of a file in Perl?
  20. What exactly does Perl’s “bless” do?
  21. How can I install a specific version of a set of Perl modules?
  22. Obtain a switch/case behaviour in Perl 5
  23. How do I extract the domain out of an URL?
  24. How do I use symbolic references in Perl?
  25. Why does $foo->{bar} autovivify but %$foo doesn’t?
  26. How can I extract text from a PDF file in Perl?
  27. What do you get if you evaluate a hash in scalar context?
  28. How to read to and write from a pipe in Perl?
  29. Can a Perl script install its own CPAN dependencies?
  30. How do I retrieve the terminal width in Perl?

Leave a Comment