home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / zkuste / Perl / ActivePerl-5.6.0.613.msi / 䆊䌷䈹䈙䏵-䞅䞆䞀㡆䞃䄦䠥 / _e59e702207ee3f42a081e036995ce1c4 < prev    next >
Text File  |  2000-03-15  |  109b  |  9 lines

  1. package bytes;
  2.  
  3. sub length ($) {
  4.     BEGIN { bytes::import() }
  5.     return CORE::length($_[0]);
  6. }
  7.  
  8. 1;
  9.