From ee7ae95211e40e798599cba2075daa456bb38368 Mon Sep 17 00:00:00 2001 From: simigern Date: Sun, 21 May 2006 12:29:13 +0000 Subject: [PATCH] add commented credentials example --- snom.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/snom.pl b/snom.pl index 56116b1..b2d4a21 100755 --- a/snom.pl +++ b/snom.pl @@ -1,5 +1,5 @@ #!/bin/sh -#$Id: snom.pl,v 1.3 2006-05-21 11:58:47 simigern Exp $ +#$Id: snom.pl,v 1.4 2006-05-21 12:29:13 simigern Exp $ PATH=/opt/csw/bin:/opt/local/bin:/usr/bin:/bin exec perl -w -x "$0" "$@" @@ -12,8 +12,9 @@ use strict; use LWP::UserAgent; my $ua = LWP::UserAgent->new; +#$ua->credentials("${ARGV[0]}:80","snom","root","geheim"); -#set_locale Gtk2; +set_locale Gtk2; sub snom_key(@) { (my $key) = @_; -- 2.39.5