This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
make the "back to top" links optional
[perl5.git] / lib / stat.pl
index 8cf0bde..f7c240a 100644 (file)
@@ -1,6 +1,7 @@
-;# $Header: stat.pl,v 3.0 89/10/18 15:19:53 lwall Locked $
+;# $RCSfile: stat.pl,v $$Revision: 4.1 $$Date: 92/08/07 18:24:13 $
 
 ;# Usage:
+;#     require 'stat.pl';
 ;#     @ary = stat(foo);
 ;#     $st_dev = @ary[$ST_DEV];
 ;#
@@ -19,6 +20,7 @@ $ST_BLKSIZE = 11 + $[;
 $ST_BLOCKS =   12 + $[;
 
 ;# Usage:
+;#     require 'stat.pl';
 ;#     do Stat('foo');         # sets st_* as a side effect
 ;#
 sub Stat {