#!/usr/bin/perl5
$a="multipart/form-data;";
if ($a =~ /^multipart\/form-data;
　　　　　(?:[\ \t]|\r?\n[\ \t])*boundary=([^\s;]+)/x ) {print "成功＝$a";}
print "成功＝$a";

以上の文ですがif文の中にセミコロン（；）があり文法的におかしいようにみえるのですが
実行ではエラーも起こらず実行できます。いったいどういった処理をしているのでしょうか？
よろしくお願いします。

PERL　:active perl 5.8
OS　　:windows2000
です。

これはマッチングの処理をしているので、セミコロンが合っても問題なく処理します。
文法の行末セミコロンではなく、文字列のセミコロンと思えばよいかと。

後ろの正規表現を取り除いて直してみると、こんな感じですかね。

$a = "multipart/form-data;";
if ($a =~ m/^multipart\/form-data;/) {
    print "成功 ＝ $a\n";
}

perlの正規表現は結構便利ですが、その文習得も大変ですね。
ありがとうございました。