Acme-CreatingCPANModules

 view release on metacpan or  search on metacpan

slides/slide13.html  view on Meta::CPAN

}


#logo {
    position: fixed;
    right: 40px;
    bottom: 51px;
    width: 130px;
    height: 150px;
    z-index:3;
    background-image: url(/logo.png);
    background-repeat: no-repeat;
}
/* END index.css */

--></style>
<script type="text/javascript">
// BEGIN controls.js
function nextSlide() {
    window.location = 'slide14.html';
}

function prevSlide() {
    window.location = 'slide12.html';
}

function indexSlide() {
    window.location = 'index.html';
}

function startSlide() {
    window.location = 'start.html';
}

function closeSlide() {
    window.close();
}

function handleKey(e) {
    var key;
    if (e == null) {
        // IE
        key = event.keyCode
    } 
    else {
        // Mozilla
        if (e.altKey || e.ctrlKey) {
            return true
        }
        key = e.which
    }
    switch(key) {
        case 8: prevSlide(); break
        case 13: nextSlide(); break
        case 32: nextSlide(); break
        case 81: closeSlide(); break
        case 105: indexSlide(); break
        case 110: nextSlide(); break
        case 112: prevSlide(); break
        case 115: startSlide(); break
        default: //xxx(e.which)
    }
}

document.onkeypress = handleKey
// END controls.js

</script>
</head>
<body>
<div id="topbar">
<table width='100%'>
<tr>
<td width="13%">CPAN</td>
<td align="center" width="73%">
    <a accesskey="s" href="start.html">Creating CPAN modules</a>
</td>
<td align="right" width="13%">
    #13
</td>
</tr>
</table>
</div>
<!-- END top -->

<div id="content">
<div class="top_spacer"></div>

<h1>lib/Acme/CreatingCPANModules.pm</h1>
<pre class="formatter_pre">package Acme::CreatingCPANModules;

use warnings;
use strict;

=head1 NAME

Acme::CreatingCPANModules - Created during a talk in London

=head1 VERSION

Version 0.01

=cut

our $VERSION = &#39;0.01&#39;;

=head1 SYNOPSIS

This module doesn&#39;t actually *do* anything...

It does have a new constructor, and a set and a get method, just so
you can do some tests.

    use Acme::CreatingCPANModules;

    my $foo = Acme::CreatingCPANModules-&gt;new&#40;&#41;;

    $foo-&gt;set&#40; 3 &#41;;

    my $bar = $foo-&gt;get&#40;&#41;;



( run in 0.780 second using v1.01-cache-2.11-cpan-140bd7fdf52 )