{"type":"rich","description":"\u3010\u672a\u5b8c\u3011 \u30fbperl \u4e71\u6570(Google) \u30fbperl rand(Google) \u30fbperl srand(Google) \u30fb\u4e71\u6570\u306e\u53d6\u5f97 \u30fb\u7c21\u5358CGI \u4e71\u6570 Part1 \u30fb\u7c21\u5358CGI \u4e71\u6570 Part2 #!/usr/bin/perl #\u2191\u30d1\u30b9\u306f\u305d\u308c\u305e\u308c\u306e\u74b0\u5883\u3067\u5909\u3048\u3066\u304f\u3060\u3055\u3044\u3002 use strict; use warnings; #\u4eca\u56de\u306fCGI\u3067\u5b9f\u9a13\u3057\u305f\u3002\u300c.cgi\u300d\u3067\u4fdd\u5b58\u3057\u3066\u304f\u3060\u3055\u3044\u3002 #\u4e71\u6570\u306e\u53d6\u5f97 print \"Content-type:text/html\\n\\n\"; print \"<html><body>\\n\"; my $foo = rand; print $foo.\"<br />\";#\u3053\u308c\u2026","blog_title":"marsonic\u306e\u65e5\u8a18","author_name":"marsonic","provider_url":"https://hatena.blog","url":"https://marsonic.hatenadiary.org/entry/20090302/1235985656","image_url":null,"width":"100%","author_url":"https://blog.hatena.ne.jp/marsonic/","published":"2009-03-02 18:20:56","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmarsonic.hatenadiary.org%2Fentry%2F20090302%2F1235985656\" title=\"Perl - \u4e71\u6570(rand, srand) - marsonic\u306e\u65e5\u8a18\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","categories":["Perl"],"version":"1.0","provider_name":"Hatena Blog","blog_url":"https://marsonic.hatenadiary.org/","title":"Perl - \u4e71\u6570(rand, srand)","height":"190"}