samirpatry has asked for the wisdom of the Perl Monks concerning the following question:


Hi all,

i have a data file which contains the value as
Fname=samir Mname=kumar Lname=patry Address=cuttack Nname=satya

in my main program i retive this value like this.
pen CONFIGFILE2, "data.txt" or die $!; { local $/; $/ = undef; $DATA=<CONFIGFILE2>; } print $DATA; # Create a config my $Config = Config::Tiny->new(); # Open the config, replace with read and $DATA with filename $Config = Config::Tiny->read_string( $DATA ); #$Config = Config::Tiny->read( $filename ); # see perldoc Config::Tiny my $s = $Config->{_};

Now i can retive the value as $s->{Fname};

but i want all the value is to be pass by argument to a another module and store in an array there.so that i can retive one by one and pass to the subroutine which create different format of the name and return to the main program.Now i pass it like this
my $FName=$s->{Fname}; my $First=Name::FName($FName);

can i pass all the value in one goal and return back to my main program.or i can use class conpect on this.

Replies are listed 'Best First'.
Re: SIP REGISTR request does not work.
by Corion (Patriarch) on Aug 21, 2006 at 06:46 UTC

    While I cannot help you with SIP or your code, which is overly verbose for the problem, I can tell you how to debug network/protocol problems. Get a network sniffer like wireshark, and capture the traffic of a normal, working client. Then capture the traffic of your fake client. Then diff the two captures, and you will find where they differ. Once you've found where they differ, you then have to make your client duplicate the working client.