Perl/チートシート

プログラミング > Perl > チートシート

Perlのプログラミングでよく使われるコードをまとめました。

---

#!/usr/bin/perl
# ↑一行目はSHEBANGでインタープリターの位置を明示。 chmod +x スクリプトしたとき、OSの image action が参照する 
# use プラグマ:
use v5.30.0;     # v5.30.0 の機能を使用する（v5.30.0より前のperlでは実行不可）。
use warnings;    # 問題となりそうな機能を警告する

# 変数宣言:
my $x;     # レキシカルスコープのスカラー変数を宣言
local $y;  # スカラーパッケージ変数 $y を退去し同じ名前の一時変数を確保 
state $z;  # レキシカルスコープの永続的な寿命を持ったスカラー変数を宣言

# データ型と接頭辞
$x;    # スカラー型
@x;    # 配列型
%x;    # ハッシュ型
&x;    # コード型

# リファレンス

# 制御構造
# 分岐
if ( 論理式 ) { ... } elsif ( 論理式 ) { ... } … else { ... }
unless ( 論理式 ) { ... } elsif ( 論理式 ) { ... } … else { ... }
# 反復
while ( 論理式 ) { ... } continue { ... }
until ( 論理式 ) { ... } continue { ... }
for ( 初期化式　; 論理式 ; 反復式 ) { ... }
foreach my $iter ( コレクション ) { ... }  continue { ... }
# for と foreach はシノニム

#サブルーチン定義
sub subr { my ($x, $y) = @_; ... }
sub subr($$) { my ($x, $y) = @_; ... }
sub subr :pritotype($$) { my ($x, $y) = @_; ... }
sub subr($x,$y) { ... }

# 正規表現
/./              # 任意の一文字
/[A-Z]/          # 英字大文字
/[a-z]/          # 英字小文字
/[0-9]/ == /\d/  # 数字
/[^0-9]/ == /\D/ #

# よく使う関数
print ();
say ();

# 演算子
$x + $y;          # 和 
$x - $y;          # 差
$x * $y;          # 積
$x / $y;          # 商
$x % $y;          # 剰余
$x ** $y;         # 累乗

$s1 . $s2;        # 連結
$s x $n;          # 繰返し

---