|
Lines 373-379
sub ParseCgiForBorrower {
Link Here
|
| 373 |
foreach ( $cgi->param ) { |
373 |
foreach ( $cgi->param ) { |
| 374 |
if ( $_ =~ '^borrower_' ) { |
374 |
if ( $_ =~ '^borrower_' ) { |
| 375 |
my ($key) = substr( $_, 9 ); |
375 |
my ($key) = substr( $_, 9 ); |
| 376 |
$borrower{$key} = $scrubber->scrub( $cgi->param($_) ); |
376 |
$borrower{$key} = $scrubber->scrub( scalar $cgi->param($_) ); |
| 377 |
} |
377 |
} |
| 378 |
} |
378 |
} |
| 379 |
|
379 |
|
| 380 |
- |
|
|