my $new_mode = $db->resultset("Starmode")->new({starmode=> $mode}); $new_mode->insert; ---- my $new_size = $db->resultset("Starsize")->new({starsize=> $size}); $new_size->insert(); --- my $new_sgt = $db->resultset("Stargrouptype")->new({type=>$sgt}); $new_sgt->insert(); --- my $new_type = $db->resultset("Startype")->new({startype=>$type}); $new_type->insert();