$raw = ".declare book_num                     a13";
$var = substr $raw, 9;
print $var;

# prints "book_num                     a13"