programming-examples/perl/String/String comperison operator cmp.pl

#!/usr/bin/perl -w

print "chicken" cmp "egg", "\n";