文字列 (たとえば $str = "010110")
を、一文字ずつ、配列に格納していくためのルーチン
をこのように書いたのですが↓

for( $i=0; $str; $i++) {
　$str =~ s/(.)(.*)/$2/;
　$flag[$i] = $1;
}

もっとスマートに書けないでしょうか?