I can't believe grantm posted this, here is the entire module (minus pod)
# $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__
It does not belong in the XML:: namespace any more than it does on CPAN (waste of space).

It does not parse XML in any way shape or form, nor does it do anything remotely useful or entertaining.

I too am excited , I can't believe grantm's selfishness (CPAN is not a crap factory).

Why are you excited gav^?

package XML::Simpler; use strict; use warnings; require Exporter; use vars qw(@ISA @EXPORT $VERSION); @ISA = qw(Exporter); @EXPORT = qw( XMLin XMLout ); $VERSION = '1.00'; sub XMLin { my $file = shift; my @lines(); open(FILE,$file) or die "couldn't open $file $!"; while(<FILE>) { my $line = $_; push @lines, \$line; } close(FILE); return @lines; } 1; __END__
Certainly excites me, but not as much as the fact that the XMLout function does not work very well, since File::Slurp's write_file looks like
sub write_file { my ($f, @data) = @_; local(*F); open(F, ">$f") || croak "open >$f: $!"; (print F @data) || croak "write $f: $!"; close(F) || croak "close $f: $!"; return 1; }
so all that would ever be printed out is HASH(0x263d8f8) or ARRAY(ox263d8f8) or some such useless tidbit.

Man oh man am I excited, so much so that I am going to write to grantm, and tell everybody I know to avoid his CPAN directory.

update (posted 4 minutes after this node was created, before dws/shotgunefx replied): the fact that "Version 1.00 of XML::Simpler was released on April 1st, 2002" further excites me (is nothing sacred anymore, must everything be tainted in such a disgusting manner).

 
______crazyinsomniac_____________________________
Of all the things I've lost, I miss my mind the most.
perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"


In reply to (crazyinsomniac: oh i'm excited) Re: new XML module by crazyinsomniac
in thread new XML module by gav^

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.