Lines 360-366
sub ParseCgiForBorrower {
Link Here
|
360 |
foreach ( $cgi->param ) { |
360 |
foreach ( $cgi->param ) { |
361 |
if ( $_ =~ '^borrower_' ) { |
361 |
if ( $_ =~ '^borrower_' ) { |
362 |
my ($key) = substr( $_, 9 ); |
362 |
my ($key) = substr( $_, 9 ); |
363 |
$borrower{$key} = $scrubber->scrub( $cgi->param($_) ); |
363 |
$borrower{$key} = $scrubber->scrub( scalar $cgi->param($_) ); |
364 |
} |
364 |
} |
365 |
} |
365 |
} |
366 |
|
366 |
|
367 |
- |
|
|