<?php
    $accept 
getenv("HTTP_ACCEPT");
    if ( 
preg_match('/application\/xhtml\+xml/i'$accept) ) {
        
header("Content-Type: application/xhtml+xml; charset=utf-8");
    }
    else {
        
header("Content-Type: text/html; charset=utf-8");
    }
    
    
$sheets = array(
        array(
            
"/2002/stylesheets/css/spring/boot.css",
            
"/2002/stylesheets/css/spring/",
            
"Spring Stylesheet"
        
),
        array(
            
"/2002/stylesheets/css/houyhnhnm/boot.css",
            
"/2002/stylesheets/css/houyhnhnm/",
            
"Houyhnhnm Stylesheet"
        
),
        array(
            
"/2002/stylesheets/css/paper/boot.css",
            
"/2002/stylesheets/css/paper/",
            
"Paper Stylesheet"
        
),
        array(
            
"/2002/stylesheets/css/lynx/boot.css",
            
"/2002/stylesheets/css/lynx/",
            
"Lynx Stylesheet"
        
),
        array(
            
"/2002/stylesheets/css/improved-houyhnhnm/boot.css",
            
"/2002/stylesheets/css/improved-houyhnhnm/",
            
"Improved Houyhnhnm Stylesheet"
        
),
        array(
            
"/2002/stylesheets/css/standard/boot.css",
            
"/2002/stylesheets/css/standard/",
            
"Standard Stylesheet"
        
),
        array(
            
"/2002/stylesheets/css/sea-sparrow/boot.css",
            
"/2002/stylesheets/css/sea-sparrow/",
            
"Sea Sparrow Stylesheet"
        
),
        array(
            
"/2002/stylesheets/css/patriot/boot.css",
            
"/2002/stylesheets/css/patriot/",
            
"Patriot Stylesheet"
        
),
        array(
            
"/2002/stylesheets/css/sm2/boot.css",
            
"/2002/stylesheets/css/sm2/",
            
"SM2 Stylesheet [ER Block 4]"
        
),
        array(
            
"/2002/stylesheets/css/sm3/boot.css",
            
"/2002/stylesheets/css/sm3/",
            
"SM3 Stylesheet"
        
),
        array(
            
"/2002/stylesheets/css/houyhnhnm-advanced/boot.css",
            
"/2002/stylesheets/css/houyhnhnm-advanced/",
            
"Houyhnhnm Advanced Style"
        
),
        array(
            
"/2002/stylesheets/css/note-advanced-paper/boot.css",
            
"/2002/stylesheets/css/note-advanced-paper/",
            
"Note: Advanced Paper"
        
),
        array(
            
"/2002/stylesheets/css/adv-paper-2/boot.css",
            
"/2002/stylesheets/css/adv-paper-2/",
            
"Advanced Paper 2"
        
),
        array(
            
"/2002/stylesheets/css/raptor/boot.css",
            
"/2002/stylesheets/css/raptor/",
            
"Project Raptor Style"
        
),
        array(
            
"/2002/stylesheets/css/kawazu-zakura/boot.css",
            
"/2002/stylesheets/css/kawazu-zakura/",
            
"Kawazu Zakura Style"
        
),
        array(
            
"/2002/stylesheets/css/sierra-508/boot.css",
            
"/2002/stylesheets/css/sierra-508/",
            
"Sierra 508 Style"
        
),
        array(
            
"/2002/stylesheets/css/yui/boot.css",
            
"/2002/stylesheets/css/yui/",
            
"Yui Style"
        
),
        array(
            
"/2002/stylesheets/css/zebra-/boot.css",
            
"/2002/stylesheets/css/zebra/",
            
"Zebra Style"
        
),
        array(
            
"/2002/stylesheets/css/ankoku-advance/boot.css",
            
"/2002/stylesheets/css/ankoku-advance/",
            
"Ankoku Advance"
        
),
        array(
            
"/2002/stylesheets/css/swing-by/boot.css",
            
"/2002/stylesheets/css/swing-by/",
            
"Project Swing-by Style"
        
),
        array(
            
"/2002/stylesheets/css/mu/boot.css",
            
"/2002/stylesheets/css/mu/",
            
"Mu Style"
        
),
        array(
            
"/2002/stylesheets/css/mifes/boot.css",
            
"/2002/stylesheets/css/mifes/",
            
"Mifes Style"
        
)
    );
    
    
#PHP 4.2.0以降は不要
    #srand ((float) microtime() * 10000000);
    
    
$selected_sheet $sheets[array_rand($sheets1)];
?>
<!DOCTYPE html>
<html lang="ja" xml:lang="ja" xmlns="http://www.w3.org/1999/xhtml">
<head>
    <meta charset="utf-8" />
    <title>スタイルシートをランダムに適用してみる実験 | スタイルシートライブラリ | W.F.N.</title>
    <meta name="author" content="Nzawa" />
    <meta name="viewport" content="width=device-width,initial-scale=1" />
    <?php echo "<link rel='stylesheet' type='text/css' href='$selected_sheet[0]' title='$selected_sheet[2]' />\n"?>

    <script type="application/ld+json">
        {
            "@context": "https://schema.org",
            "@type": "BreadcrumbList",
            "name": "パンくずリスト@WFN",
            "itemListElement": [
                {
                    "@type": "ListItem",
                    "position": 1,
                    "item": {
                        "@type": "WebPage",
                        "@id": "https://wellformed.org/",
                        "name": "ホームページ"
                    }
                },
                {
                    "@type": "ListItem",
                    "position": 2,
                    "item": {
                        "@type": "WebPage",
                        "@id": "https://wellformed.org/2002/stylesheets/",
                        "name": "スタイルシートライブラリ"
                    }
                },
                {
                    "@type": "ListItem",
                    "position": 3,
                    "item": {
                        "@type": "WebPage",
                        "name": "スタイルシートをランダムに適用してみる実験"
                    }
                }
            ]
        }
    </script>
</head>
<body>

<h1>スタイルシートをランダムに適用してみる実験</h1>



<h2>この実験について</h2>

<h3>概要</h3>

<p>タイトルの通り、スタイルシート(今回は<abbr title="Cascading Style Sheets">CSS</abbr>)を<abbr title="HyperText Markup Language">HTML</abbr>文書にランダムに適用しようという実験です。サーバサイドの<abbr title="PHP: Hypertext Preprocessor">PHP</abbr>を通して、link要素のhref属性をランダムに変化させています。スタイルシートが有効な環境であれば、このページを読込む毎に、スタイルシートがランダムに切替るのが分るでしょう。勿論、同一のスタイルシートが連続して適用されることもありますが。</p>

<p>まあ、「何を今更」という感じですが、単にえぬざわがPHPで何か作ってみたかっただけだったりします。</p>

<h3>補足</h3>

<p>スタイルシートをランダムに変えても、サーバと閲覧者に負荷が掛るだけで、多分それ程良いことはありません。一部のページで実験してみるのは構わないと思いますが、サイト全体でこういう事をするのはお奨めしません。</p>



<h2>現在適用中のスタイルシート</h2>

<p>現在適用されているスタイルシートは <?php echo "<a href='$selected_sheet[1]'>$selected_sheet[2]</a>"?> です。</p>



<h2>用意されているスタイルシート</h2>

<ol>
<?php
    
foreach ( $sheets as $item ) {
        echo 
"\t<li><a href='$item[1]'>$item[2]</a></li>\n";
    }
?>
</ol>



<h2>このPHPスクリプトのソース</h2>

<ul>
    <li><a href="randomstylesheetsexperiment-source.php">/2002/stylesheets/misc/random/randomstylesheetsexperiment-source.php</a>(構文ハイライト)</li>
</ul>



<h2>このページについて</h2>

<dl class="page-properties">

<dt>ナビゲーション</dt>
<dd>
    <ul>
        <li><a href="/">ホームページ</a></li>
        <li><a href="/2002/stylesheets/">スタイルシートライブラリ</a></li>
        <li>スタイルシートをランダムに適用してみる実験</li>
    </ul>
</dd>

<dt>公開日</dt>
<dd><time itemprop="datePublished">2003-06-18</time></dd>

<dt>更新日</dt>
<dd><time itemprop="dateModified">2011-09-08</time></dd>

<dt>制作者</dt>
<dd itemprop="creditText">&#169; 2003-2009,2011 Nzawa.</dd>

</dl>

</body>
</html>