#!/usr/bin/perl
use warnings;
use strict;
our @list = ('a' .. 'z', 'A' .. 'Z', 0 .. 9, '`', '~', '!', '@', '#', '$', '%', '^', '&', '*', '(', ')', '-', '_', '=', '+', '[', '{', ']', '}', ';', ':', '\'', '"', '\\', '|', ',', '<', '.', '>', '/', '?');
our $1 = $list[$const1];
our $2 = $list[$const2];
our $3 = $list[$const3];
our $4 = $list[$const4];
our $5 = $list[$const5];
our $6 = $list[$const6];
our $7 = $list[$const7];
our $8 = $list[$const8];
our $9 = $list[$const9];
our $10 = $list[$const10];
our $const1 = 0;
our $const2 = 0;
our $const3 = 0;
our $const4 = 0;
our $const5 = 0;
our $const6 = 0;
our $const7 = 0;
our $const8 = 0;
our $const9 = 0;
our $const10 = 0;
our $total;

LOOP:
for ($const1 = $const1; $cosnt1 <= 93; $const1++)
    {
    $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
    $1 = $list[$const1];
    print $total;
    if ($const1 == 94)
        (
        $const1 = 0;
        $const2++;
        $2 = $list[$const2];
        $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
        print $total;
            if ($const2 == 94)
                {
                $const2 = 0;
                $const3++
                $3 = $list[$const3];
                $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
                print $total;
                    if ($const3 == 94)
                    {
                    $const3 = 0;
                    $const4++
                    $4 = $list[$const4];
                    $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
                    print $total;
                        if ($const4 == 94)
                        {
                        $const4 = 0;
                        $const5++
                        $5 = $list[$const5];
                        $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
                        print $total;
                            if ($const5 == 94)
                            {
                            $const5 = 0;
                            $const6++
                            $6 = $list[$const6];
                            $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
                            print $total;
                                if ($const6 == 94)
                                {
                                $const6 = 0;
                                $const7++
                                $7 = $list[$const7];
                                $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
                                print $total;
                                    if ($const7 == 94)
                                    {
                                    $const7 = 0;
                                    $const8++
                                    $8 = $list[$const8];
                                    $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
                                    print $total;
                                        if ($const8 == 94)
                                        {
                                        $const8 = 0;
                                        $const9++
                                        $9 = $list[$const9];
                                        $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
                                        print $total;
                                            if ($const9 == 94)
                                            {
                                            $const9 = 0;
                                            $const10++
                                            $10 = $list[$const10];
                                            $total = $10, $9, $8, $7, $6, $5, $4, $3, $2, $1;
                                            print $total;
                                                if ($10 == 93}
                                                    {
                                                    print "Brute complete.\n";
                                                    exit
                                                    }
                                                else
                                                    {
                                                    goto LOOP;
                                                    }
                                            }

                                        else
                                            {
                                            goto LOOP;
                                            }
                                        }

                                    else
                                        {
                                        goto LOOP;
                                        }
                                    }

                                else
                                    {
                                    goto LOOP;
                                    }
                                }

                            else
                                {
                                goto LOOP;
                                }
                            }

                        else
                            {
                            goto LOOP;
                            }
                        }

                    else
                        {
                        goto LOOP;
                        }
                    }

                else
                    {
                    goto LOOP;
                    }
                }

            else
                {
                goto LOOP;
                }
        }
    else
        {
        goto LOOP;
        }
    }
goto LOOP;