タグ

ProgrammingとCGIに関するamayanのブックマーク (2)

  • 正規表現 [Perl講座 -Smart]

    正規表現の概要 正規表現は、Perlの中で最も重宝する機能のひとつです。正規表現にはテキスト処理のための様々な機能があり、文字列の中から特定のパターンを見つけ出したり、置換したりすることができます。 正規表現の基的な使用方法 たとえば、$strという変数に格納したデータの中から、「A」で始まって途中は何があるかわからないが最後が「E」という文字列を探したい場合、次のように記述することで、条件にマッチする文字列を見つけることができます。 $str =~ /A.*E/; 上記では、ドット( . )が改行以外の1文字を表し、アスタリスク( * )がその任意の文字の0回以上の繰り返しを意味します。このように、正規表現において特殊な働きを持った文字を正規表現演算子、またはメタ文字と呼びます。また、=~ はパターン結合演算子と呼ばれ、「左辺の値から右辺の値を検索する」という意味があります。 正規表現

    正規表現 [Perl講座 -Smart]
  • :: Cepheid :: - ImageMagickの使用例 | 画像の入力・出力

    画像の入力・出力 基となる画像の読み書きです。Read()で指定した画像を読み込み、Write()で画像を書き出します。 #!/usr/local/bin/perl -w use strict; use Image::Magick; # 画像を指定 my $file = "sample.jpg"; # オブジェクト作成 my $image = Image::Magick->new; # 画像読み込み $image->Read($file); # 画像処理 $image->Emboss(radius=>2, sigma=>1); # 画像出力 $image->Write("output.jpg"); undef $image; exit; このスクリプトを実行すると、output.jpgが同じ階層に出力されるはずです。またWrite()に与えるファイル名の拡張子は自由に変更できます。例えば

  • 1