@{$a1}[ ($b1-$longest+1) .. $b1 ]