#!/usr/bin/perl
$perl="hashable_language";
$language{$perl}=
"hashable language"
$C="unhashable_language";
$language{$C}=
"unhashable_language;
print "perl, perl, perl the $perl language. So much better than a $C. When you see a $C and compare it to a $perl you may want to hurl!\n";
$Favoritelanguage=<STDIN>;
chomp $Favoritelanguage;
if (Favoritelanguage eq "Perl!") {
print "hash all you like for end is never in sight, only when the RAM is at the end of it's capacity like THE Llama in the sand.\n";
} else {
print "in this language, hash is only a dream, for only in your dreams will it SEEM possible.\n";