package App;
use strict;
use warnings;
use 5.008;
our $VERSION = '0.01';
sub add {
my ($x, $y) = @_;
return $x+$y;
}
=head1 NAME
App - application
=head1 SYNOPSIS
A quick example for the really inpatient.
=head1 DESCRIPTION
=head2 Methods
=over 4
=item method_a
=item method_b
=back
=head1 BUGS
Probably plenty but nothing I know of. Please report them to the author.
=head1 Development
Instructions to those who wish to participate in the development efforts.
E.g. where is the version control system, where is the development mailing
list or forum (if you have one).
=head1 Thanks
Potential thanks to people who helped you.
=head1 AUTHOR
Gabor Szabo <gabor@szabgab.com>
=head1 COPYRIGHT
Copyright 2006 by Gabor Szabo <gabor@szabgab.com>.
This program is free software; you can redistribute it
and/or modify it under the same terms as Perl itself.
See http://www.perl.com/perl/misc/Artistic.html
=cut
1;