DB<128>   $CORE::{substr}
 => *CORE::substr

  DB<129>   $CORE::{print}
 => undef