くだすれPerl（超初心者用）2

>>292

修正です。

# 先頭の全角スペース、半角スペースの連続を削除
$example =~ s/^([\　\ ]+)//;