Perl

Perl - 乱数(rand, srand)

【未完】 ・perl 乱数(Google) ・perl rand(Google) ・perl srand(Google) ・乱数の取得 ・簡単CGI 乱数 Part1 ・簡単CGI 乱数 Part2 #!/usr/bin/perl #↑パスはそれぞれの環境で変えてください。 use strict; use warnings; #今回はCGIで実験した。「.cgi」…

Perl - undefとは?

【要まとめ】 ・perl undef(Google) undef関数は、すでに定義された変数の定義を無効にする。関数の返却値は常に未定義です。 引数を省略して、未定義値(undef)を返し、サブルーチンの返却値として使うことができる。 ・Perl5編 第16章 配列を操作する関数…

$foo = shift;ってなんだろうか?

・perl shift(Google) ・shiftについて ・$foo = shift(Google) サブルーチンで引数を受け取るときに、よく見るパターンだそうです。 下記の例は、sub1, sub2は全く同じ動作になり、sub3も@_の長さが短くなること以外は同じ。 &sub(10, 20);#このように呼び…

Perl - eval()とは?warn、dieも。

・perl eval (Google検索結果) ・Perlリファレンス eval eval() eval(expr)やeval{...}で、ブロックや括弧内をPerlのスクリプトとみなして実行する。最後に実行した命令の結果が戻り値として返される。 エラーやdieだったら、undefineを返し、$@にエラーメッ…

Perl - use strictとは?(useについての説明も)

・perl strict (Google検索結果) ・Perl/CGIに必ず登場するuse strictの解説(初心者向け) strict 下記の方のリンクの解説を見ると、use strictの効果は端的に言ってタイプミスを見つけてバグが減ることだそうで、そして、use strictを使うと、変数を宣言す…

Perl - chomp関数

・perl chomp (Google検索結果) chomp() 行末の改行を削除する #!/usr/bin/perl $message = "こんにちは\n"; $message2 = "さようなら"; chomp($message); print $message.$message2; 【表示結果】 こんにちはさようなら

Perl(CGI) - forでprintをバーッと

だから何?と思われる方も多いだろうが。私にとっては大きな一歩ぽ。 #!/perl/bin/perl.exe print "Content-type: text/html\n\n"; for($i = 0; $i < 10; $i++){ print "こんにちは<br>\n"; #10回こんにちはを縦に表示 }

Perl(CGI)でHTMLを取り扱うときの注意点?

#!/Perl/bin/perl.exe print "Content-type: text/html\n\n"; # これを入力しないとHTMLが表示されない。(サーバーエラーとなる) # Perlの機能なのか?それともCGIの機能なのか? # PHPのノリでずっと書いていてもダメのようだ・・・。;。;

Perl - Locationヘッダで別のページへ

・Locationでジャンプ のサイトを参考にしました。HTTPヘッダのLocationヘッダを利用すると別のページへジャンプできるという。そこで、それを利用したプログラムを書いてみる。例えば、 Location: http://ホスト名/ でそのサイトへ移動できる print "Locati…

Perl リンク集

【入門編】 ・perl 入門 (Google検索結果)【CGI編】 ・perl cgi (Google検索結果) ・Perl/CGI研究室 'PERL-LABO' ・beginners CGI Perl/CGI講座 ・Perl講座 [Smart] 基礎からリファレンスまである。 ・正しいPerl/CGIの書き方 ITPro ・KENT WEB ・perl 掲示…