summaryrefslogtreecommitdiffstats
path: root/contrib/perl5/lib/bytes_heavy.pl
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/perl5/lib/bytes_heavy.pl')
-rw-r--r--contrib/perl5/lib/bytes_heavy.pl8
1 files changed, 8 insertions, 0 deletions
diff --git a/contrib/perl5/lib/bytes_heavy.pl b/contrib/perl5/lib/bytes_heavy.pl
new file mode 100644
index 0000000..47bdbf9
--- /dev/null
+++ b/contrib/perl5/lib/bytes_heavy.pl
@@ -0,0 +1,8 @@
+package bytes;
+
+sub length ($) {
+ BEGIN { bytes::import() }
+ return CORE::length($_[0]);
+}
+
+1;
OpenPOWER on IntegriCloud