>1
Hehe... I forgot the 1; again , but I do have this in my code. =)
> my $ref = \%lib1::abc;
How about if I don't package it ? and hopefully just make it looks
like %ENV ? For my case in real , that's something like this :
## params.pl in /lib/ ##
my $lib{root} = 'C:/myLib/'; my $rt = $lib{root};
my $lib{char_maps} = $rt."chinese/gbb5.map";
my $lib{gb_map} = $rt}."chinese/gb.map";
....
my $lib{temp} = $rt."temp/";
sub WhereIs { my $request = shift; return $lib{$request} }
1;
## EOF paras ##
So when I call it, then
eval { require "params.pl" } or die "params" ;
$temp_file = WhereIs('temp') . time . ".txt" ;
open TEMP, >$temp_file;
........
Now, I hope can be like this $Where{temp}. time .".txt" ,
Is that possible ? Maybe that's not a real problem in this case,
just for the taste and feeling. But I don't if I have to deal with
other problem like this....
> h2xs as the way to start....
Yes, I am interested about that too... Let me start it as another thread =)
Rgds,
Connie
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
