print "Matched!\n" if($user =~ /^aristotle73$/i);