for my $i ('!', '"', '#', '$', '%', '&', "'", '(', ')', '*', '+', ',', '-', '.', '/')
{
    &nForX($code, 0, 1, 'a', $i);
}