$weather{outside} = 'frightful';
$fire = 'so delightful';

while ($you eq "love me so") {
    print "let it snow\n"x3;
}