PPT Slide
Perl - split Split a string into sub-parts based on a delimiter.
foreach $ITEM (split(/\|/,$SQL_ROW)) { . . . } # Parse pipe-delimited record
sub populate_form_variables {
(
$input{SERIAL_ID},
$input{TYPE_CODE},
$input{TAPE_NUM},
$input{TITLE},
$input{HOURS},
$input{COMMENT},
$PLACEHOLDER
)
= split(/\|/,$UNLOAD_LIST[0],7);
}