$_=reverse $form;
s =~ s/#/pop @num || 0/e;
return reverse $_;