# $Id: Simpler.pm,v 1.0 2002/04/01 00:00:00 grantm Exp $

package XML::Simpler;

use strict;
use warnings;

require Exporter;
use File::Slurp;

use vars qw(@ISA @EXPORT $VERSION);
@ISA = qw(Exporter);
@EXPORT = qw( XMLin XMLout );
$VERSION = '1.00';

sub XMLin  { read_file ( $_[0]       ) }
sub XMLout { write_file( $_[1], $_[0]) }

1;
__END__