電線の画像

Pointgets.net

写真やサンプルプログラムなど、日々の気になった出来事をメモしてる個人的なブログです。

スタイルシートのlinkタグを出力

PerlモジュールのCGI.pmを使用して、スタイルシートのlinkタグを出力しました。

#!/opt/local/bin/perl
 
use strict;
use warnings;
use CGI qw(:standard :no_xhtml);
 
print "Content-type: text/plan; charset=utf-8\n\n";
 
my $cgi = new CGI;
 
print $cgi -> start_html(
	-lang => "ja-JP",
	-title => "",
	-head => [meta({charset => 'UTF-8'})],
	-style => "1.css"
);
 
 
exit;

サンプルコードです。スタイルシートのlinkタグを生成します。

<!DOCTYPE html
	PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
	 "http://www.w3.org/TR/html4/loose.dtd">
<html lang="ja-JP"><head><title>Untitled Document</title>
<meta charset="UTF-8">
<link rel="stylesheet" type="text/css" href="1.css">
</head>
<body>

出力結果です。

スポンサードリンク
スポンサードリンク