The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/env perl
use strict;
use warnings;
use App::Nopaste::Command;

if (my $url = App::Nopaste::Command->new_with_options->run) {
    print $url;
    print "\n";
}

__END__

=pod

=head1 NAME

nopaste - command-line utility to nopaste

=head1 VERSION

version 0.98

=head1 DESCRIPTION

See the documentation of L<App::Nopaste::Command>.

=cut