<?xml version="1.0" encoding="UTF-8"?>
<?xml-stylesheet type="text/css" href="/stylesheets/rss.css"?>
<rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:trackback="http://madskills.com/public/xml/rss/module/trackback/">
  <channel>
    <title>Vidul Nikolaev Petrov: JAPH with AUTOLOAD</title>
    <link>http://www.vidul.com/articles/2008/02/03/japh-with-autoload</link>
    <language>en-us</language>
    <ttl>40</ttl>
    <description></description>
    <item>
      <title>JAPH with AUTOLOAD</title>
      <description>&lt;div class="typocode"&gt;&lt;pre&gt;&lt;code class="typocode_perl "&gt;
#!/usr/bin/perl

JAPH-&amp;gt;Just-&amp;gt;Another-&amp;gt;Perl-&amp;gt;Hacker;

package JAPH;

sub AUTOLOAD { bless [print+($AUTOLOAD=~/::(.+)/)[0], q/ /] } sub DESTROY {}
 &lt;/code&gt;&lt;/pre&gt;&lt;/div&gt;</description>
      <pubDate>Sun, 03 Feb 2008 07:20:00 -0700</pubDate>
      <guid isPermaLink="false">urn:uuid:2d976a2a-69ba-4861-87ce-7afff2f3cf37</guid>
      <author>root</author>
      <link>http://www.vidul.com/articles/2008/02/03/japh-with-autoload</link>
      <category>Perl</category>
      <category>japh</category>
    </item>
  </channel>
</rss>
