no strict 'refs';
if (defined ${"${\substr $one, 1}"}) {
   ...
}