Language Basics Perl

  1. Home
  2. Perl
  3. Language Basics
  4. String comparison operator
print "Please enter letters from k to m\n";
while (<>) {
    chop;
    if ($_ lt 'k' or $_ gt 'm') {
        print "Please enter letters from k to m\n";
    } else {
        print "Thank you - let's have another!\n";
    }
}