# cuddled - I feel that it's harder to read.
    if ($foo) {
        if ($bar) {
            print "We have a foo and a bar.\n";
        } else {
            print "We have a foo.\n";
        }
    } else {
        print "You have no foo.\n;
    }

#uncuddled - one way (the way I use)
    if ($foo) {
        if ($bar) {
            print "We have a foo and a bar.\n";
        } 
        else {
            print "We have a foo.\n";
        }
    } 
    else {
        print "You have no foo.\n;
    }