Ritusriv
Last Activity: Nov 13 '08, 06:54 AM
Joined: Jul 18 '08
Location:
-
Thats true but I just wanted to confirm that Is there any way in Perl to do so..... -
how to add the user to one unix group using perl
Hi
I just wanted to know is there any way in the perl to add a unix user to unix group.
e.g.
I linux we have command to do so,
I have found a CPAN perl module Linux:usermod to do so,Is there any other way except this module ?Code:usermod -a -G <group> <user>
Regards,
Ritusriv -
how to pass multiple args to expect spawn
Hi,
I am trying to write a small script to spwan a perl script with some specific args to perl script.
...Code:#! /usr/bin/expect -f set args " -abstract=\"AutoEM : FIX MONITORING TAR TO OHSOAP\" -queuename=xxx -product=111 -note=\"A tar created for broken monitoring\"" eval spawn ./autosr $args #expect "Enter pass key :" #send "xxxx\r"
-
Can you expalin your problem in more details if this problem still exists.Leave a comment:
-
Also you can try as,
Code:use Sys::Hostname; my $host = hostname;
Leave a comment:
-
If you want to include the module which are in the same directory where your binary is,then try this
use FindBin qw($Bin);
use lib "$Bin";
use Pty;
use Tty;
..............Leave a comment:
-
Instead of trying ...
$localdir = join ($dl, "S:", "Free");
$filename = join ($dl, $localdir, $thefile);
you should have written :
$filename = join ($dl, "S:","Free",$th efile);Leave a comment:
No activity results to display
Leave a comment: