Help for this page

Select Code to Download

Select or download this

use Data::Dumper;

print Data::Dumper->Dump([\%RegStudentNew, \%RegInstructorNew,
...
    \%StudentLogins, \%InstructorLogins ],
    [qw( RegStudentNew, RegInstructorNew, RegStudentExisting,
         RegInstructorExisting, StudentLogins, InstructorLogins )]);