あ・・・
($a[$j],$a[$j-1])=($a[$j-1],$a[$j])