--
[ Picked text/plain from multipart/alternative ]
Not entirely sure what exactly you are wanting, but I'm guessing maybe
something like ...
my $params = join(" ",@ARGV);
$params =~ m/\-ip +(\S+) +-port +(\S+) +-pass +(\S+) +-command +(.+)/;
my $ipaddress = $1;
my $port = $2;
my $pass = $3;
my $command = $4;
My regex isn't the best and a few diff ways to do it I guess.
Ian
On 9/22/07, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
>
> Using this installed:
>
>
> http://turkeyfiles.escapedturkey.net/misc/scripts/root/rcon-hl2-0.02.tar.gz
>
> trying to make a script that reads parameters (hl2rcon.pl):
>
> #!/usr/bin/perl
> my $rcon = Rcon::HL2->new(
> hostname => "$ipaddress:$port",
> password => "$pass",
> timeout => 3,
> );
>
> $rcon->run("$command");
> print $rcon->response();
> # end
>
> I just need to add a portion to this script to do the following (so I
> can pass on parameters to it):
>
> ./hl2rcon.pl -ip -port -pass -command
>
> Example:
>
> ./hl2rcon.pl -ip 72.5.249.2 -port 20715 -pass whatever -command
> "status"
>
> Thank you. =)
>
>
>
> _______________________________________________
> To unsubscribe, edit your list preferences, or view the list archives,
> please visit:
> http://list.valvesoftware.com/mailman/listinfo/hlds_linux
>
--
_______________________________________________
To unsubscribe, edit your list preferences, or view the list archives, please
visit:
http://list.valvesoftware.com/mailman/listinfo/hlds_linux