$value = 'dia'.$i.'th';
@{$value} = $in{$i.'th'.$s};
じゃだめだっけ？
変数の格納先になる配列が沢山あるというのは、設計をやり直したほうがいいとは思うけど。
ハッシュとか、2次元配列とか。