#!perl
use strict;
use 5.008001;
use warnings;
use App::revealup::cli;

App::revealup::cli->new->run(@ARGV);

__END__

=head1 NAME

revealpl - Web app for showing Markdown as slides

=head1 SYNOPSIS

revealpl -p 5000

 Options:
   -p    HTTP Port Number

=cut
