1 # $Id: Connect.pm,v 1.6 2006-11-02 16:11:44 mike Exp $
3 # See ZOOM/IRSpy/Task/Search.pm for documentation
5 package ZOOM::IRSpy::Task::Connect;
11 use ZOOM::IRSpy::Task;
12 our @ISA = qw(ZOOM::IRSpy::Task);
17 return $class->SUPER::new(@_);
25 my $conn = $this->conn();
26 $conn->log("irspy_task", "connecting");
27 $conn->connect($conn->option("host"));
28 warn "no ZOOM-C level events queued by $this"
36 return ref($this) . " " . $this->conn()->option("host");
39 use overload '""' => \&render;