my $record = $header_id->fetchrow_hashref;
my $header_id_num = $record->{ 'id' };

##</code><code>##

$header_id = $dbh->prepare( $sql_command ) || die $dbh->errstr;
$header_id->execute || die $dbh->errstr;