指定ディレクトリの中のHTMLファイルのタイトルを取得してサイトマップを作ります。 下のサンプルソースでは、指定したディレクトリ内の拡張子 html のファイルを探し、 サイトマップを生成、 sitemap.html というファイル名で出力します。 #!/usr/local/bin/perl #置換えするディレクトリの指定 $dirset = '.'; #出力するHTMLファイル名 $putfilename = 'sitemap.html'; #生成後ファイルのパス(相対パスもしくはhttps://から) $scpas = './'; #ページのヘッダ部 $pagehead = <<"HEAD"; <HTML> <HEAD> <META http-equiv="Content-Type" content="text/html; charset=Shift_JIS"> </HEAD> <BO