X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=urisagit%2FPerl-Docs.git;a=blobdiff_plain;f=lib%2FFile%2FSlurp.pm;fp=lib%2FFile%2FSlurp.pm;h=41600ff15519593fd9b80b2ad54c5b5869f08603;hp=9b14a7df297e6d76263197ff9a3c6672325f3a11;hb=8a1e3264d118e5f0edb9f4b9755cd6adbcce5760;hpb=d0834228f271f9b01a5842ce3b5e71ee7079b882 diff --git a/lib/File/Slurp.pm b/lib/File/Slurp.pm index 9b14a7d..41600ff 100755 --- a/lib/File/Slurp.pm +++ b/lib/File/Slurp.pm @@ -15,9 +15,21 @@ use vars qw( @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $VERSION ) ; $VERSION = '9999.17'; -@EXPORT_OK = qw( slurp prepend_file ) ; -%EXPORT_TAGS = ( 'all' => [ - qw( read_file write_file overwrite_file append_file read_dir ) ] ) ; +@EXPORT_OK = qw( + slurp + prepend_file + edit_file + edit_file_lines +) ; + +%EXPORT_TAGS = ( 'all' => [ qw( + read_file + write_file + overwrite_file + append_file + read_dir ), + @EXPORT_OK +] ) ; @EXPORT = ( @{ $EXPORT_TAGS{'all'} } ); my $max_fast_slurp_size = 1024 * 100 ;