File::Mangle - Perl module for file manipulation
use File::Mangle qw(replace_block); replace_block('/etc/sudoers', 'automanaged', "martyn ALL=(ALL) ALL"); my $data = fetch_block('/etc/sudoers', 'automanaged');
A collection of utilities designed to make programmatic editing of configuration files nice and simple.
None by default.
Performs the returning existing block part of the replace_block() function below without altering the file in any way.
Edits the file filename adding start and end markers if they're not already there. Once the markers are in place, it replaces everything between the markers with replacement.
line-comment-marker defaults to '#' (which is prefixed to the markers to ensure they don't intefere with the purpose of the file).
This function returns the data that was in the block prior to the replacement.
Edits the file filename adding start and end markers if they're not already there.
The placement parameter is a regexp fragment which File::Mangle uses to find a line in the target file to insert the markers before
This function returns nothing if the block already exists or it was unable to find the placement regexp, and it returns 1 on success
This function operates exactly like insert_block_before with the exception of putting the markers after the placement match instead of before.
Martyn Smith, <martyn@dollyfish.net.nz>
Copyright (C) 2007 by Martyn Smith
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.
To install File::Mangle, copy and paste the appropriate command in to your terminal.
cpanm
cpanm File::Mangle
CPAN shell
perl -MCPAN -e shell install File::Mangle
For more information on module installation, please visit the detailed CPAN module installation guide.