第11回 基礎プログラミング II レポート課題 氏名 : 藤井 駿 学籍番号 : C1091307 語学クラス : 英語3 コース : 地域共創 チーム名 : FAKE チームホームページアドレス : http://roy/~c109001/fake/fake.html プロジェクト名 : 1) シラベマス 2) SIPSIPサロンパス 1.ホームページでの作業 A.ホームページを参照 「http://roy/~c109130/index.html」 B.リーダーではないため実施せず 2.レポートの中身 A.1)シラベマス → 気軽にオンラインでシラバスを見られたら便利だ ということで実際にシラバスを作ってみることに してみた。 2) SIPSIPサロンパス → シラベマス を参考にしながら SIP登録の際に 少しでも役立つように作成してみた。 時間割を作成して自分のスケジュールを確認 できるようにした。 B.担当プロジェクト : シラベマス プロジェクトホームページ : http://roy/~c109001/fake/fake-1.html 私担当 : プログラム & CGIページ & 企画書 青木千紗担当 : datファイル & 解説書 & 広告ページ C.解説 ◎CGIページ「syllabus.html」 シラバス

シラバス

オンラインで各科目のシラバスを見ることができます。

☆科目一覧

数学的考え方 / 基礎の自然科学(化学) / 基礎の自然科学(物理) / 基礎の自然科学(生物) / 社会調査論(2009)

情報と社会(旧:生活と情報) / 法と現代社会(旧:憲法) / 会計学基礎論 / 山形地域論(2010) / 共創まちづくり論(2010)

共創の技法I(2010) / 現代社会と福祉II / インクルージョン社会論 / 相談援助の基礎と専門職II / 社会保障II

少子高齢社会論 / 地球環境科学 / 森林の保全と共生(2010) / 日本史b / 自然地理学b(2010)

人文地理学b / 教育学 / アジアを知ろう


◎プログラム「syllabus.rb」 #!/usr/bin/env ruby $KCODE = 'e' # 文字化け防止 require 'cgi' # CGI を宣言 c = CGI.new("html4") kamo = c["kamoku"] print("Content-type: text/html; charset=EUC-JP\n\n") # 日本語コード print("\n") print("\n") print("\n") print("シラバス表示\n") print("\n") print("\n") print("

\n") print("

シラバス

\n") print("
\n") if kamo == "数学的考え方" # もし kamo が "数学的考え方"なら open("suugaku.dat","r")do|data| # suugaku.dat を open させる while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "基礎の自然科学(化学)" open("kagaku.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "基礎の自然科学(物理)" open("buturi.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "基礎の自然科学(生物)" open("seibutu.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "社会調査論(2009)" open("syakaichosa.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "情報と社会(旧:生活と情報)" open("zhouhotosyakai.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "法と現代社会(旧:憲法)" open("kenpou.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "会計学基礎論" open("kaikeigaku.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "山形地域論(2010)" open("yamagatachiiki.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "共創まちづくり論(2010)" open("sirabasu_12.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "共創の技法I(2010)" open("sirabasu_13.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "現代社会と福祉II" open("sirabasu_14.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "インクルージョン社会論" open("sirabasu_15.dat ","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "相談援助の基礎と専門職II " open("sirabasu_16.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "社会保障II" open("sirabasu_17.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "少子高齢社会論" open("sirabasu_18.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "地球環境科学" open("sirabasu_19.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "森林の保全と共生(2010)" open("sirabasu_20.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "日本史b" open("sirabasu_21.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "自然地理学b(2010)" open("sirabasu_22.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "人文地理学b" open("sirabasu_23.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "教育学" open("sirabasu_24.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end if kamo == "アジアを知ろう" open("sirabasu_25.dat","r")do|data| while line = data.gets if /(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/ =~ line print("

科目名

\n") printf("

%s

\n",$1) print("

担当教員

\n") printf("

%s

\n",$2) print("

テーマ

\n") printf("

%s

\n",$3) print("

講義概要

\n") printf("

%s

\n",$4) print("

講義のねらい・到達目標

\n") printf("

%s

\n",$5) print("

評価方法

\n") printf("

%s

\n",$6) print("

その他(テキスト、参考書、注意事項等)

\n") printf("

%s

\n",$7) print("

受講者へ一言

\n") printf("

%s

\n",$8) end end end end print("
\n") print("

\n") print("\n") print("\n") 自分が作成したプログラムで大変だったのは、データをなかなか反映させる ことができなかったところである。原因だったのが「"」を一ヶ所付け忘れ ていたことであった。単純なミスだからこそ冷静に見極めることが大切だっ たと改めて感じることができた。 E.メンバー紹介 : F → 藤井 駿 A → 青木 千紗(リーダー) K → 久保田瑛一郎 E → 遠藤裕貴