スーパーpre記法を使ってperlのソースを書くとおかしくなるみたい

下記のソースを投稿すると・・・

 >|perl|
 use MT::Asset;
 my $image = MT::Asset->load({ file_name => "Water lilies.jpg" });
   
 use Data::Dumper;
 return Dumper($image);
 ||<
※表示用に行頭に半角スペースを入れてます

↓こうなってしまう！

my $image = MT::Asset-

何が原因なんだろう・・・
念のため、perlの時は「スーパーpre記法」で書くようにしようっと。

追記(2008/12/13)

あ、あれ？いつのまにか直ってる･･･

use MT::Asset;
my $image = MT::Asset->load({ file_name => "Water lilies.jpg" });

use Data::Dumper;
return Dumper($image);