$var = ".declare book_num                     a13";
$var = ".declare cube_no		9999999.999";

##</code><code>##


$var =~ s/^(\.\w+\s+)(\w+)(\s+.)/$2/g;