183dee668d
* Adding link shortener/paste module * Adding image downloder * Added TODO/Wish list * add Exporter to modules
16 lines
181 B
Perl
16 lines
181 B
Perl
package ping;
|
|
|
|
use strict;
|
|
use vars qw/$VERSION/;
|
|
|
|
use Exporter qw(import);
|
|
our @EXPORT = qw(pong);
|
|
|
|
$VERSION = "1.0";
|
|
|
|
sub pong {
|
|
return ('200', 'text/plain', "pong\n");
|
|
}
|
|
|
|
1;
|