△▲　WebProg 初心者の質問 Part6　▼▽

URLの抽出で

＞　# 文書 $text から http URL を抽出して @http に格納する
＞　@http = $text =~ /s?https?:\/\/[-_.!~*'()a-zA-Z0-9;\/?:\@&=+\$,%#]+/g;

とあるので、やってみたのですが、
Unrecognized character \x81
のエラーが帰ってきます。
どこに\x81と言うのがないので訳がわかりません。
どうかよろしくお願いします。