GIT.Harvie.CZ
/
mirrors
/
Programs.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
Fixed bug in treshold-cross logic
[mirrors/Programs.git]
/
perl
/
map-reduce
/
function-string.pl
1
#!/usr/bin/env perl
2
use
strict
;
3
use
warnings
;
4
5
my
$sub
=
q
{{
6
print
"rofl
\n
"
;
7
}};
8
9
print
"
$sub
\n
"
;
10
eval
$sub
;
11
eval
"sub foo
$sub
"
;
foo
();
This page took
0.332786 seconds
and
4
git commands to generate.