#!/usr/bin/perl
my $love;
for (@you) {
    until ($i) {die $i; do {}};
}