my $root = do {
our $S //= 0;
srand $S if $S;
my $r;
my @a =(
'a'..'z',
1..9,
'A'..'Z',
);
$r = int( rand $#a ), splice @a, $r, 2, [ @a[ $r, $r+1 ]] while @a > 1;
@a = @{ $a[0] };
\@a;
};
####
Fudgy >anomaly.txt
Fudgy -S=2 >>anomaly.txt
Fudgy -S=3 >>anomaly.txt
Fudgy -S=4 >>anomaly.txt
Fudgy -S=40 >>anomaly.txt
Fudgy -S=400 >>anomaly.txt
Fudgy -S=400000 >>anomaly.txt
Fudgy -S=99999400000 >>anomaly.txt
notepad anomaly.txt
##
##
_________________/\_________________________________________________
_/\_____ _____/\___________________________________
_/\ _/\_______ ___________________________/\___ _/\_________
/\ c _/\ ___/\_ _________/\_____ _/\ _______________________/\ _/\
a b /\ f _/\_ /\ _/\_______ _/\_______ /\ B ___/\_________________ T _____/\ Z
d e /\ /\ k l _/\ _/\ _/\ ___/\_________ 9 A ___/\_ _____/\_ /\_ Y
g h i j /\ o ___/\ t /\ w _/\_ _______/\_ /\_ /\ ___/\___ /\_ U /\_
m n /\_ s u v /\ /\ /\___ /\ C /\ F G ___/\_ _/\ Q /\ V /\
p /\ x y z 1 2 _/\_ 7 8 D E _/\_ /\ /\ P R S W X
q r /\ /\ /\ /\ L M N O
3 4 5 6 H I J K
_______/\_____________________________________________________________________________________________________
_/\___ _______________________________/\_
_/\ _/\_ _____________________________________/\___ /\
_/\ d /\ /\ _____________/\___________________________________ _/\_________________________ Y Z
/\ c e f g h ___________/\_______ _______/\ /\ _________________/\
a b ___/\_____ _/\___ _____________________/\___ H I J _____/\_______________ X
/\_ _/\___ _/\ _/\ ___/\_ _/\_ /\_ ___________/\
i /\ _/\ _/\ _/\ u /\ x /\_ /\_ /\ /\ K /\_ _/\___ W
j k /\ n /\ q /\ t v w y /\ 2 /\_________ D E F G L /\ /\ _/\_____
l m o p r s z 1 3 _______/\___ M N O P /\ _/\
/\_ _/\_ Q R _/\ V
4 /\___ /\ /\ /\ U
5 _/\ 9 A B C S T
/\ 8
6 7
_______________________________________________________________________________/\
___________________________________/\___________________________________________ Z
_/\___________________________ _________________________________/\_______________________________
/\ _______/\_ _____/\_________ _______________/\_
a b _________/\_ /\_ _/\_ _____/\___________ ___________/\_ /\
___/\_______ /\___ q /\_ /\ /\_ _/\_ _______/\_______ _/\_________ /\_________ X Y
___/\_ _____/\ m _/\ r /\ u v w /\ /\ /\_ _/\___ _/\_ /\ _/\ P _/\_
/\_ /\ /\_ l /\ p s t x y z 1 2 /\ /\ _/\_ ___/\ /\ H I _/\ O ___/\ /\
c /\ f g h /\_ n o 3 4 5 6 /\ /\ /\_ E F G _/\ N _/\_ U V W
d e i /\ 7 8 9 A B /\ _/\ M /\ /\
j k C D /\ L Q R S T
J K
_________________________________________________________________________/\_____________________________________
_/\___________________________ ___________________________________/\_
_/\ _____/\_______________ /\_______________________________ /\
/\ c _/\_ ___________/\___________________ F ___________________________/\_ Y Z
a b _______/\ /\_ _/\_________ _______________/\_ _/\_________________________ /\
___/\_ n o /\ /\ _/\ _/\_ /\_ /\ ___________/\ W X
___/\_ /\_ p q r s ___/\ y /\ /\_ A /\_ G H _____/\_____ V
_/\_ /\ j /\_ _/\_ x z 1 2 /\___ B /\_ _/\_ _/\___
/\ /\ h i k /\ /\ /\ 3 _/\___ C /\ ___/\ /\_ _/\ _/\
d e f g l m t u v w /\ _/\_ D E /\_ L M /\ /\ R /\ U
4 5 /\ /\ I /\ N O P Q S T
6 7 8 9 J K
___________/\_______________________________________
___/\_______ _____________________________/\___
_/\_ ___/\_ ___/\_________________________ _/\___________
_____/\ /\ _/\_ /\ ___/\_ _____________________/\_ /\ _____/\___
_/\___ g h i /\ /\ n o /\_ /\ _/\_________________ /\ A B ___/\___ _/\___________
_/\ _/\ j k l m p /\ s t /\ ___________/\_ 8 9 /\_ _/\ /\ _______/\_________
/\ c /\ f q r u v _/\_________ /\ C /\ /\ H I J _/\___ ___/\___
a b d e _/\ _____/\ 6 7 D E F G /\ _/\_ ___/\_ _/\_
/\ y _/\_ 5 K L /\ /\ /\_ /\ /\ /\_
w x /\ /\_ M N O P Q /\ T U V W X /\
z 1 2 /\ R S Y Z
3 4
_________________________/\_____________________________________________________
_____________/\_ _____________/\_
/\_______ /\_____________________ _______________/\_ /\_____________
a _/\_ i _____________/\ ___/\_______ /\_____ N _________/\___
___/\ /\_ ___/\___ u ___________/\_ ___/\___ G ___/\_ _/\_ _/\_
/\_ e f /\ _/\_ _/\_____ _____/\___ /\ _/\_ _/\_ /\_ /\_ /\ /\_ /\ /\_
b /\ g h /\ /\ /\ _/\_ /\_ _/\_____ 6 7 /\ /\ /\ /\ H /\ K /\ O P Q /\___ V W X /\
c d j k l m n o _/\ /\ v /\_ /\ _/\ 8 9 A B C D E F I J L M R _/\ Y Z
/\ r s t w /\ z 1 _/\ 5 /\ U
p q x y /\ 4 S T
2 3
___________________________________/\_________________
_/\_______________________ _________/\___
_______________________________________________/\ ___/\___ _____/\___ _/\___
_/\_____________________________________ 1 _______________/\_ _/\_____ /\___ _/\___ /\ _/\_
/\ _____________/\_______ _/\___ /\ /\ _/\ K _/\ /\ _/\ T U /\ /\_
a b _______/\_ _/\ /\ _/\___ C D E F _/\ J /\ N O P /\ S V W X /\
_______/\_____ /\___ _/\ z 2 3 /\ _/\___ /\ I L M Q R Y Z
___/\_ ___/\ o _/\_____ _/\ y 4 5 /\ _/\_ G H
_/\_ /\_ /\_ n /\ _/\ /\ x 6 7 /\ /\
/\ /\ g /\_ k /\ p q _/\ u v w 8 9 A B
c d e f h /\ l m /\ t
i j r s
_______/\___________________________________________
___________________________________/\_____ ___________________________________/\___________
_/\___________________ ___/\ _____/\_________________________________ _______/\_
/\ _______/\_________ /\_ x /\___ _______________________________/\ _/\___ /\_
a b _______/\_ _______/\___ u /\ y _/\ /\___ K /\ _/\_ R /\___
_/\___ /\_ /\_ _/\ v w /\ 2 3 _/\_ L M /\ /\ S _/\_______
/\ _/\_ i /\_ m /\_ /\ t z 1 /\ /\_______________ N O P Q /\ _/\
c d /\ /\ j /\ n /\_ r s 4 5 6 _________/\___ T U ___/\ Z
e f g h k l o /\ _/\_ _/\___ /\_ Y
p q _/\ /\_____ /\ _/\ V /\
/\ 9 A ___/\ F G /\ J W X
7 8 /\_ E H I
B /\
C D