projects
/
urisagit/Perl-Docs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
deleted
[urisagit/Perl-Docs.git]
/
t
/
over.pl
diff --git
a/t/over.pl
b/t/over.pl
deleted file mode 100644
(file)
index
ce9bafb
..0000000
--- a/
t/over.pl
+++ /dev/null
@@
-1,17
+0,0 @@
-
-print prototype( 'CORE::sysread' ), "\n" ;
-
-BEGIN {
-
- *CORE::GLOBAL::time = sub { CORE::time };
-}
-
-print time(), "\n" ;
-
-BEGIN{
-local *CORE::GLOBAL::time = sub { 123 };
-
-print time(), "\n" ;
-}
-
-print time(), "\n" ;