Select Code to Download

Select or download this
```
# @a = ('aeafa7cfdbd58c');
```

# @a = ('bcb3d8dec8dd', 'b4d6c7ea52a7',);

Select or download this

# @h = ('6a', 61, 54, 76, 32, 66, '4e', 44, 64, 76, 63, '6b', '6f',);

Select or download this

# @a = ('bcb3d8dec8dd', 'b4d6c7ea52a7', 'aeafa7cfdbd58c',);

Select or download this

# @a = ('bcb3d8dec8dd', 'b4d6c7ea52a7', undef, 'aeafa7cfdbd58c',);

Select or download this

# @a = ('bcb3d8dec8dd', 'b4d6c7ea52a7', '8fbac5c5e252', 'aeafa7cfdbd58
+c',);

Select or download this

# $x = 'b4d6c7ea52a7bcb3d8dec8dd8fbac6c6e252aeafa7cfdbd58c';

Select or download this

# @b = ('b4', 'd6', 'c7', 'ea', 52, 'a7', 'bc', 'b3', 'd8', 'de', 'c8'
+, 'dd', '8f', 'ba', 'c6', 'c5', 'e2', 52, 'ae', 'af', 'a7', 'cf', 'db
+', 'd5', '8c',);

Select or download this

# @z = ('6a', 61, 54, 76, 32, 66, '4e', 44, 64, 76, 63, '6b', '6f', '6
+a', 61, 54, 76, 32, 66, '4e', 44, 64, 76, 63, '6b', '6f',);

Select or download this

# For each iteration of the loop, here are the values of $n, $_, hex($
+_), $z[$n], hex($z[$n]), and hex($_)-hex($z[$n]):
# undef 'b4'    180     '6a'    106     $japh[ 0] = 74
...
# 104   h       107     k       108     l
# 110   n       111     o       114     r
# 115   s       116     t       117     u

Select or download this
```
# Just Another Perl Hacker!
```