projects
/
urisagit/Perl-Docs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
update
[urisagit/Perl-Docs.git]
/
experiment
/
carp.pl
diff --git
a/experiment/carp.pl
b/experiment/carp.pl
deleted file mode 100644
(file)
index
3e2dce5
..0000000
--- a/
experiment/carp.pl
+++ /dev/null
@@
-1,10
+0,0 @@
-#!/usr/local/bin/perl
-
-
-use Carp ;
-
-$carp = shift ;
-
-( ( $carp eq 'carp' ) ? \&carp : \&croak )->( "can't open file\n ) ;
-
-print "ok\n" ;