#!/usr/bin/perl
use strict;
use CGI::Carp qw(fatalsToBrowser);
use CGI;
chdir ("D:/senko/contents/saiyo/career/entry");
use MIME::Base64;
use lib "D:/senko/contents/saiyo/career/entry/lib";
use CGI::Session qw/-ip_match/;
my $name01 = "";
my $name02 = "";
my $choice01 = "";
my $choice02 = "";
my $kana01 = "";
my $kana02 = "";
my $birth01 = "";
my $birth02 = "";
my $birth03 = "";
my $post01 = "";
my $post02 = "";
my $add01 = "";
my $add02 = "";
my $address01 = "";
my $address02 = "";
my $phone01 = "";
my $phone02 = "";
my $phone03 = "";
my $mphone01 = "";
my $mphone02 = "";
my $mphone03 = "";
my $family = "";
my $consort1 = "";
my $consort2 = "";
my $gaku1 = "";
my $gaku2 = "";
my $gaku3 = "";
my $workArea1 = "";
my $workArea2 = "";
my $workArea3 = "";
my $job01_1 = "";
my $job01_2 = "";
my $job01_3 = "";
my $job01_4 = "";
my $job01_5 = "";
my $job01_6 = "";
my $job01_7 = "";
my $job02_1 = "";
my $job02_2 = "";
my $job02_3 = "";
my $job02_4 = "";
my $job02_5 = "";
my $job02_7 = "";
my $job03_1 = "";
my $job03_2 = "";
my $job03_3 = "";
my $job03_4 = "";
my $job03_5 = "";
my $job03_7 = "";
my $job04_1 = "";
my $job04_2 = "";
my $job04_3 = "";
my $job04_4 = "";
my $job04_5 = "";
my $job04_7 = "";
my $job05_1 = "";
my $job05_2 = "";
my $job05_3 = "";
my $job05_4 = "";
my $job05_5 = "";
my $job05_7 = "";
my $license01 = "";
my $ex = "";
my $exYear = "";
my $license02 = "";
my $licenseTxt = "";
my $entry_when = "";
my $pr = "";
my $message = "";
my $err_cnt = 0;
my $err_msg;
#エラーで戻ってきた場合
my $cgi = new CGI;
my $cid = $cgi->cookie('CGISESSID')||0;
#セッション情報取得
my $session = new CGI::Session(undef, $cgi, {Directory => './tmp'});
if(!$cid || $cid ne $session->id) {
} else {
$name01 = $session->param('name01');
$name02 = $session->param('name02');
$choice01 = $session->param('choice01');
$choice02 = $session->param('choice02');
$kana01 = $session->param('kana01');
$kana02 = $session->param('kana02');
$birth01 = $session->param('birth01');
$birth02 = $session->param('birth02');
$birth03 = $session->param('birth03');
$post01 = $session->param('post01');
$post02 = $session->param('post02');
$add01 = $session->param('add01');
$add02 = $session->param('add02');
$address01 = $session->param('address01');
$address02 = $session->param('address02');
$phone01 = $session->param('phone01');
$phone02 = $session->param('phone02');
$phone03 = $session->param('phone03');
$mphone01 = $session->param('mphone01');
$mphone02 = $session->param('mphone02');
$mphone03 = $session->param('mphone03');
$family = $session->param('family');
$consort1 = $session->param('consort1');
$consort2 = $session->param('consort2');
$gaku1 = $session->param('gaku1');
$gaku2 = $session->param('gaku2');
$gaku3 = $session->param('gaku3');
$workArea1 = $session->param('workArea1');
$workArea2 = $session->param('workArea2');
$workArea3 = $session->param('workArea3');
$job01_1 = $session->param('job01_1');
$job01_2 = $session->param('job01_2');
$job01_3 = $session->param('job01_3');
$job01_4 = $session->param('job01_4');
$job01_5 = $session->param('job01_5');
$job01_6 = $session->param('job01_6');
$job01_7 = $session->param('job01_7');
$job02_1 = $session->param('job02_1');
$job02_2 = $session->param('job02_2');
$job02_3 = $session->param('job02_3');
$job02_4 = $session->param('job02_4');
$job02_5 = $session->param('job02_5');
$job02_7 = $session->param('job02_7');
$job03_1 = $session->param('job03_1');
$job03_2 = $session->param('job03_2');
$job03_3 = $session->param('job03_3');
$job03_4 = $session->param('job03_4');
$job03_5 = $session->param('job03_5');
$job03_7 = $session->param('job03_7');
$job04_1 = $session->param('job04_1');
$job04_2 = $session->param('job04_2');
$job04_3 = $session->param('job04_3');
$job04_4 = $session->param('job04_4');
$job04_5 = $session->param('job04_5');
$job04_7 = $session->param('job04_7');
$job05_1 = $session->param('job05_1');
$job05_2 = $session->param('job05_2');
$job05_3 = $session->param('job05_3');
$job05_4 = $session->param('job05_4');
$job05_5 = $session->param('job05_5');
$job05_7 = $session->param('job05_7');
$license01 = $session->param('license01');
$ex = $session->param('ex');
$exYear = $session->param('exYear');
$license02 = $session->param('license02');
$licenseTxt = $session->param('licenseTxt');
$entry_when = $session->param('entry_when');
$pr = $session->param('pr');
$message = $session->param('message');
$err_msg = $session->param('err_msg');
$err_cnt = @$err_msg;
}
#--セレクトボックス------------
#希望職種
my @choice_list = ();
push(@choice_list, "1.中途採用(事務・営業系)・営業");
push(@choice_list, "2.中途採用(事務・営業系)・国際事業");
push(@choice_list, "3.中途採用(事務・営業系)・貿易");
push(@choice_list, "4.中途採用(事務・営業系)・物流センター運営");
push(@choice_list, "5.ドライバー職");
push(@choice_list, "6.オペレーター職");
push(@choice_list, "7.広報、法務・労務、ICT戦略企画マネージャー");
my $choise01_option = ''."\r\n";
foreach my $val (@choice_list) {
my $selected = "";
if ($choice01 eq $val) {
$selected = "selected";
}
$choise01_option .= ''."\r\n";
}
my $choise02_option = ''."\r\n";
foreach my $val (@choice_list) {
my $selected = "";
if ($choice02 eq $val) {
$selected = "selected";
}
$choise02_option .= ''."\r\n";
}
#都道府県
my @pref_list = ();
push(@pref_list, "北海道");
push(@pref_list, "青森県");
push(@pref_list, "岩手県");
push(@pref_list, "宮城県");
push(@pref_list, "秋田県");
push(@pref_list, "山形県");
push(@pref_list, "福島県");
push(@pref_list, "茨城県");
push(@pref_list, "栃木県");
push(@pref_list, "群馬県");
push(@pref_list, "埼玉県");
push(@pref_list, "千葉県");
push(@pref_list, "東京都");
push(@pref_list, "神奈川県");
push(@pref_list, "新潟県");
push(@pref_list, "富山県");
push(@pref_list, "石川県");
push(@pref_list, "福井県");
push(@pref_list, "山梨県");
push(@pref_list, "長野県");
push(@pref_list, "岐阜県");
push(@pref_list, "静岡県");
push(@pref_list, "愛知県");
push(@pref_list, "三重県");
push(@pref_list, "滋賀県");
push(@pref_list, "京都府");
push(@pref_list, "大阪府");
push(@pref_list, "兵庫県");
push(@pref_list, "奈良県");
push(@pref_list, "和歌山県");
push(@pref_list, "鳥取県");
push(@pref_list, "島根県");
push(@pref_list, "岡山県");
push(@pref_list, "広島県");
push(@pref_list, "山口県");
push(@pref_list, "徳島県");
push(@pref_list, "香川県");
push(@pref_list, "愛媛県");
push(@pref_list, "高知県");
push(@pref_list, "福岡県");
push(@pref_list, "佐賀県");
push(@pref_list, "長崎県");
push(@pref_list, "熊本県");
push(@pref_list, "大分県");
push(@pref_list, "宮崎県");
push(@pref_list, "鹿児島県");
push(@pref_list, "沖縄県");
my $add01_option = ''."\r\n";
foreach my $val (@pref_list) {
my $selected = "";
if ($add01 eq $val) {
$selected = "selected";
}
$add01_option .= ''."\r\n";
}
my $workArea1_option = ''."\r\n";
foreach my $val (@pref_list) {
my $selected = "";
if ($workArea1 eq $val) {
$selected = "selected";
}
$workArea1_option .= ''."\r\n";
}
my $workArea2_option = ''."\r\n";
foreach my $val (@pref_list) {
my $selected = "";
if ($workArea2 eq $val) {
$selected = "selected";
}
$workArea2_option .= ''."\r\n";
}
#卒業区分
my @gaku_list = ();
push(@gaku_list, "大学院卒");
push(@gaku_list, "大学卒");
push(@gaku_list, "高専卒");
push(@gaku_list, "短大卒");
push(@gaku_list, "高校卒");
push(@gaku_list, "専修・専門卒");
push(@gaku_list, "その他");
my $gaku1_option = ''."\r\n";
$gaku1_option .= ''."\r\n";
foreach my $val (@gaku_list) {
my $selected = "";
if ($gaku1 eq $val) {
$selected = "selected";
}
$gaku1_option .= ''."\r\n";
}
#入社希望時期
my @entry_when_list = ();
push(@entry_when_list, "1ヶ月以内");
push(@entry_when_list, "3ヶ月以内");
push(@entry_when_list, "半年以内");
push(@entry_when_list, "未定");
my $entry_when_option = ''."\r\n";
foreach my $val (@entry_when_list) {
my $selected = "";
if ($entry_when eq $val) {
$selected = "selected";
}
$entry_when_option .= ''."\r\n";
}
#配偶者
my $consort1_01 = "";
my $consort1_02 = "";
if ($consort1 eq "有") {
$consort1_01 = "checked";
}
if ($consort1 eq "無") {
$consort1_02 = "checked";
}
#配偶者の扶養義務
my $consort2_01 = "";
my $consort2_02 = "";
if ($consort2 eq "有") {
$consort2_01 = "checked";
}
if ($consort2 eq "無") {
$consort2_02 = "checked";
}
#大型免許の有無
my $license01_01 = "";
my $license01_02 = "";
if ($license01 eq "有") {
$license01_01 = "checked";
}
if ($license01 eq "無") {
$license01_02 = "checked";
}
#ドライバー経験の有無・年数
my $ex_01 = "";
my $ex_02 = "";
if ($ex eq "有") {
$ex_01 = "checked";
}
if ($ex eq "無") {
$ex_02 = "checked";
}
#フォークリフト免許の有無
my $license02_01 = "";
my $license02_02 = "";
if ($license02 eq "有") {
$license02_01 = "checked";
}
if ($license02 eq "無") {
$license02_02 = "checked";
}
#希望勤務エリア
my $workArea3_chk = "";
if ($workArea3 eq 'どこでも可') {
$workArea3_chk = "checked";
}
#職歴01
my $job01_6_01 = "";
my $job01_6_02 = "";
if ($job01_6 eq "現職中") {
$job01_6_01 = "checked";
}
if ($job01_6 eq "離職中") {
$job01_6_02 = "checked";
}
print << "END_OF_HTML";
Content-type: text/html;charset=UTF-8
エントリー応募フォーム | SENKO 中途採用ホームページ
当社への応募をご希望の方は、下記フォームよりエントリーしてください。後日弊社よりご連絡させていただきます。
尚、当社では応募者の方々の採用選考を目的として、応募者の個人情報をいただいています。いただいた情報は、採用選考目的以外に利用することはございません。
エントリーフォームの送信にあたっては、個人情報保護方針をご確認ください。
END_OF_HTML
if ($err_cnt > 0) {
print '
';
print '
';
foreach my $i (@$err_msg) {
print "- $i
";
}
print '
';
print '
';
}
print << "END_OF_HTML";
必須は入力必須項目です。
選考の流れ
END_OF_HTML