use Fax::Hylafax::Client qw(sendfax);
     $Fax::Hylafax::Client::User       = 'fax';
     $Fax::Hylafax::Client::Password   = 'fax';



     my $fax = sendfax(
          host          => '172.16.99.24',
          dialstring    => '01150316513L1150316481',
          docfile       => '/home/hpercara/sendfile.txt',
          coverfile     => '/home/hpercara/cover.ps',
          notifyaddr    => 'hpercara@iplan.com.ar',
	  
     );

     if ($fax->success)
     {
          print "We are OK\n";
     }
     else
     {
          print $fax->trace;
     }