I had tried that first but will try gain.
In manageuser Removed EXPORT of LoggedON_user_id
my $username1 = $session->param("user_id"); warn("username1 : '$username1'");
Error Log manageusers
Already logged on LoggedOn_user_id : '428' at /home/jalamior/www/httpsdocs/cgi-bin/lib/perl/manageusers.pm line 287. username1: '428' at /home/jalamior/www/httpsdocs/cgi-bin/lib/perl/manageusers.pm line 290.
and
$LoggedOn_user_id = $username1; warn("Already logged on LoggedOn_user_id : '$LoggedOn_user_id'");
And the error log
Already logged on LoggedOn_user_id : '428' at /home/jalamior/www/httpsdocs/cgi-bin/lib/perl/manageusers.pm line 287
So the desired value is present in the variable in manageusers
In calling unit, changed import use manageusers; Commented out qw(LoggedOn_user_id);
Line 66 in calling unit.
$userid_1 = $manageusers::LoggedON_user_id;
warn("userid : '$userid_1' ");
Error Log line 66
Sat Apr 8 06:54:25 2017 update_tables-development.cgi: Use of uninitialized value in concatenation (.) or string at update_tables-development.cgi line 66. userid : '' at update_tables-development.cgi line 66.
Don't know where else to look
In reply to Re^6: global var
by tultalk
in thread global var
by tultalk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |