diff options
author | Jesse Luehrs <doy@tozt.net> | 2010-06-15 21:20:26 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2010-06-15 21:21:56 -0500 |
commit | 508218365c734253b7a0855084031be28446de66 (patch) | |
tree | 80cf3464c6c425e3cf017f56ee5c0e66861b82a4 /lib | |
parent | 43477c66218bbf97a1ad83d6df70e38c19926240 (diff) | |
download | app-termcast-508218365c734253b7a0855084031be28446de66.tar.gz app-termcast-508218365c734253b7a0855084031be28446de66.zip |
dzil stuff0.07
Diffstat (limited to 'lib')
-rw-r--r-- | lib/App/Termcast.pm | 80 |
1 files changed, 12 insertions, 68 deletions
diff --git a/lib/App/Termcast.pm b/lib/App/Termcast.pm index 4b51398..dc9a6c0 100644 --- a/lib/App/Termcast.pm +++ b/lib/App/Termcast.pm @@ -1,14 +1,13 @@ package App::Termcast; use Moose; +# ABSTRACT: broadcast your terminal sessions for remote viewing + +with 'MooseX::Getopt::Dashes'; + use IO::Pty::Easy; use IO::Socket::INET; use Scope::Guard; use Term::ReadKey; -with 'MooseX::Getopt::Dashes'; - -=head1 NAME - -App::Termcast - broadcast your terminal sessions for remote viewing =head1 SYNOPSIS @@ -22,11 +21,7 @@ broadcasting of a terminal session for remote viewing. =cut -=head1 ATTRIBUTES - -=cut - -=head2 host +=attr host Server to connect to (defaults to noway.ratry.ru, the host for the termcast.org service). @@ -40,7 +35,7 @@ has host => ( documentation => 'Hostname of the termcast server to connect to', ); -=head2 port +=attr port Port to use on the termcast server (defaults to 31337). @@ -53,7 +48,7 @@ has port => ( documentation => 'Port to connect to on the termcast server', ); -=head2 user +=attr user Username to use (defaults to the local username). @@ -66,7 +61,7 @@ has user => ( documentation => 'Username for the termcast server', ); -=head2 password +=attr password Password for the given user. The password is set the first time that username connects, and must be the same every subsequent time. It is sent in plaintext @@ -84,7 +79,7 @@ has password => ( . " (mostly unimportant)", ); -=head2 bell_on_watcher +=attr bell_on_watcher Whether or not to send a bell to the terminal when a watcher connects or disconnects. Defaults to false. @@ -99,7 +94,7 @@ has bell_on_watcher => ( . " or disconnects", ); -=head2 timeout +=attr timeout How long in seconds to use for the timeout to the termcast server. Defaults to 5. @@ -205,11 +200,7 @@ sub _in_ready { vec($vec, fileno(STDIN), 1); } -=head1 METHODS - -=cut - -=head2 write_to_termcast $BUF +=method write_to_termcast $BUF Sends C<$BUF> to the termcast server. @@ -230,7 +221,7 @@ sub write_to_termcast { $self->socket->syswrite($buf); } -=head2 run @ARGV +=method run @ARGV Runs the given command in the local terminal as though via C<exec>, but streams all output from that command to the termcast server. The command may be an @@ -318,57 +309,10 @@ no Moose; Use L<MooseX::SimpleConfig> to make configuration easier. -=head1 BUGS - -No known bugs. - -Please report any bugs through RT: email -C<bug-app-termcast at rt.cpan.org>, or browse to -L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=App-Termcast>. - =head1 SEE ALSO L<http://termcast.org/> -=head1 SUPPORT - -You can find this documentation for this module with the perldoc command. - - perldoc App::Termcast - -You can also look for information at: - -=over 4 - -=item * AnnoCPAN: Annotated CPAN documentation - -L<http://annocpan.org/dist/App-Termcast> - -=item * CPAN Ratings - -L<http://cpanratings.perl.org/d/App-Termcast> - -=item * RT: CPAN's request tracker - -L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=App-Termcast> - -=item * Search CPAN - -L<http://search.cpan.org/dist/App-Termcast> - -=back - -=head1 AUTHOR - - Jesse Luehrs <doy at tozt dot net> - -=head1 COPYRIGHT AND LICENSE - -This software is copyright (c) 2009-2010 by Jesse Luehrs. - -This is free software; you can redistribute it and/or modify it under -the same terms as perl itself. - =cut 1; |