Perlの代入式は左辺値の値が取られるため、これは以下のコードと等価です。代入したのに文字列が出てきた!?バグか!?と驚くかもしれません。これは実はちゃんとPerlのドキュメントに明記されている挙動です。)のあとの変数名が記号で始まるものは特殊変数と呼ばれ、処理系によって特殊な扱われ方をする変数になっています。したりすることで調べられます。なんなのかを調べてみましょう。errnoを扱うための特殊変数だということがわかります。正数変数の現在の値を取得します。