programming-examples/perl/String/String comperison operator greater than.pl

#!/usr/bin/perl -w

print "dog" gt "cat", "\n";