=================================================================== RCS file: /cvs/wpscripts/ztransfer/main.pl,v retrieving revision 1.3 retrieving revision 1.7 diff -u -r1.3 -r1.7 --- wpscripts/ztransfer/main.pl 2011/07/20 07:44:51 1.3 +++ wpscripts/ztransfer/main.pl 2012/04/01 06:52:10 1.7 @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: main.pl,v 1.3 2011/07/20 07:44:51 yason Exp $ +# $Id: main.pl,v 1.7 2012/04/01 06:52:10 yason Exp $ use db; use send; use fileops; @@ -8,7 +8,7 @@ use hash; our $ZFILESERVER_IP = '192.168.16.1'; -our @ZMPOINTS = ('rmt_maket'); +our @ZMPOINTS = ('/mnt/rmt_maket'); our $mpoint; # according to manual of Perl's function system(), @@ -63,6 +63,9 @@ send::zayavki(); send::probas(); +send::tt(); +send::zjpeg(); +send::pjpeg(); db::disconnect();