diff options
| author | fukachan <fukachan> | 2001-03-10 11:11:19 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-03-10 11:11:19 +0000 |
| commit | d621dcfea1f1213111acf4aa3247a84ff340e313 (patch) | |
| tree | 3c1256ee2da67663cdc9d79d60816e3af58151dc /fml/lib/File/Utils.pm | |
| parent | a5c04f7f06246f0158d230427988db3944e946ed (diff) | |
| download | fml8-d621dcfea1f1213111acf4aa3247a84ff340e313.tar.gz fml8-d621dcfea1f1213111acf4aa3247a84ff340e313.tar.bz2 fml8-d621dcfea1f1213111acf4aa3247a84ff340e313.zip | |
update descriptions
Diffstat (limited to 'fml/lib/File/Utils.pm')
| -rw-r--r-- | fml/lib/File/Utils.pm | 34 |
1 files changed, 32 insertions, 2 deletions
diff --git a/fml/lib/File/Utils.pm b/fml/lib/File/Utils.pm index 401768aa..b319d86c 100644 --- a/fml/lib/File/Utils.pm +++ b/fml/lib/File/Utils.pm @@ -20,7 +20,7 @@ require Exporter; =head1 NAME -File::Utils - error handling utilities +File::Utils - utilities to handle files =head1 SYNOPSIS @@ -37,7 +37,6 @@ C<search_program> and C<copy>. - =head1 METHODS =cut @@ -55,6 +54,13 @@ sub error { return $ErrorString;} sub error_reset { undef $ErrorString;} +=head2 C<mkdiehier($dir, $mode)> + +make a directory C<$dir> by the mode C<$mode> recursively. + +=cut + + # Descriptions: "mkdir -p" or "mkdirhier" # Arguments: directory [file_mode] # Side Effects: set $ErrorString @@ -75,6 +81,12 @@ sub mkdirhier } +=head2 C<touch($file, $mode)> + +create a file which is size zero if the file not exists. + +=cut + # Descriptions: touch: create file if file not exists # Arguments: file file_mode # Side Effects: none @@ -109,6 +121,18 @@ sub touch } +=head2 C<search_program($file [, $path_list ])> + +search C<$file>. +C<$path_list> is the hash array. +It searches it among C<$path_list> if specified. + +The default search path list is + + ('/usr/bin', '/bin', '/sbin', ' /usr/local/bin', + '/usr/gnu/bin', '/usr/pkg/bin') + +=cut # Descriptions: file $file executable # Arguments: file [path_list] @@ -146,6 +170,12 @@ sub search_program } +=head2 C<copy($src, $dst)> + +copy C<$src> to C<$dst> in the atomic way. +This routine uses C<IO::File::Atomic> module. + +=cut # wrappers for delegation :-) sub copy |
