use MyDB;

our @ISA = qw(Exporter);
our @EXPORT = qw(ConnectSsh SendAndGet_Cmd);

sub ConnectSsh
{
   #connect to shell
   #writes to DB
   WriteValueToDB ($text)
}

sub SendAndGet_Cmd
{
   my ($cmd) = @_;
   #sends commands over shell handle
}

1;