Pastebin
API
tools
faq
paste
Login
Sign up
SHARE
TWEET
Untitled
a guest
Jun 21st, 2018
98
0
Never
Add comment
Not a member of Pastebin yet?
Sign Up
, it unlocks many cool features!
Perl
0.33 KB
| None
|
0
0
raw
download
clone
embed
print
report
@
ARGV
=
$0
;
$a
=
[
[
{
map
{
$i
++,
$_
}
<>
}
,
q
{
python
?
}
,
q
[
nope
:
)
]
]
,
qw
[
perl is cool
.
]
]
,
$_
=
$a
->
[
0
]
->
[
0
]
->
{
ord
(
$/
)
>
2
}
,
y
d
#ddd,$_
.=
join
' '
,
map
{
$a
->
[
$_
]
}
1
..
3
;
print
Add Comment
Please,
Sign In
to add comment
Public Pastes
🤑 G2A.com Free Gift Card Guide Apr 2024 FIX 🤑
GetText | 19 min ago | 0.38 KB
🤑 G2A.com Free Gift Card Guide Apr 2024 FIX 🤑
GetText | 37 min ago | 0.39 KB
subhuman's sym code
Lisp | 46 min ago | 0.14 KB
Untitled
ARM | 47 min ago | 0.43 KB
threading2
Python | 1 hour ago | 2.75 KB
Untitled
Java | 1 hour ago | 0.18 KB
Custom Doom GZdoom zscript sounds
Bash | 1 hour ago | 1.24 KB
Doom zscript gzdoom sound file creator
Bash | 2 hours ago | 0.15 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the
Cookies Policy
.
OK, I Understand
Not a member of Pastebin yet?
Sign Up
, it unlocks many cool features!