#!/usr/bin/perl # use warnings; print"Which came first, the chicken or the egg? "; print "chicken" cmp "egg", "\n"; print "Are dogs greater than cats? "; print "dog" gt "cat", "\n"; print "Is ^ less than + ? "; print "^" lt "+", "\n";