Help for this page

Select Code to Download


  1. or download this
    package MyUserProfile;
require Exporter;
...
use Register qw(PrintTemplate RegisterChange RegisterAcctPath Register
+SetupUser
                EDIT_PROFILE VIEW_IMAGES read_user_db);
use MyUtils qw(:DEFAULT);
  2. or download this
    [...]
use MyUserProfile qw(:DEFAULT);
[...sometime later in some function...]
my $acct_data = MyUserProfile::ProfileGet($acct);
[...]