- or download this
while (<>) {
if ($str eq "") {
...
$str = $str . "," . "'" . substr($line,0,$x) . "'";
}
}
- or download this
@array = ($str);
print $query->start_multipart_form("POST","printFields");
...
-value=>[ @array ]);
print $query->submit('doWhat','Print Fields');
print $query->end_form;
- or download this
@array = ($str);
- or download this
@array = ('Date','Forename','Middle','School');