my $first = ''; my $second = ''; my $third = ''; my $fourth = ''; my $fifth = ''; my $sixth = ''; my @vars = ('$first', '$second', '$third', '$fourth', '$fifth', '$sixth'); my @aarr = ('