foreach my $argv (@ARGV) {
   map {
      &do_something($_)
   } (split //, $argv)
}