Select Code to Download

         use XML::Simple;
 
         my $config = XMLin();

<config>
  <perlmonks>
...
     <email>youself@yourisp.net</email>
  </notification>
</config>

CREATE TABLE messages (
    message_id integer NOT NULL,
...
    content character varying(200) NOT NULL
);

#!/usr/bin/perl -w
######################################################################
+##
...
  }
}