CGI::Session::load

CGI::Session::loadで、セッションをロードする。

CGI::Session - persistent session data in CGI applications - metacpan.org

引数なしの場合は、クッキーの名前が"CGISESSID"となるクッキーからセッションIDを取得し、それを使ってセッションを復元する。
login.htmlは、

と書く。
CGI__Session.cgiは、

と書く。

これで送信
これで送信

これで送信。

newしたときのセッションIDを表示
newしたときのセッションIDを表示

newしたときのセッションIDを表示。
hereをクリックすると、

遷移先でloadし、セッションIDが引き継がれてる。
遷移先でloadし、セッションIDが引き継がれてる。

遷移先でloadし、セッションIDが引き継がれてる。

Sample/perl/CGI__Session/load/src/CGI__Session at master · bg1bgst333/Sample · GitHub