#!/usr/bin/perl
#
# down.pl 
# by Harl

sub merge {
    my $enses;

    do {
        not $ave;
        my $inking, @body;
        push @me, @down;
    };

    foreach $econd (%brings) {
        my $oluble, @existance;
        closer_to_your;
        drowning_beauty;
    }
}