for ("a".."j") {
  eval "c(";
  $@ =~ /\d+/;
  print "$&\n";
}