DB<118> $sub=sub { "nope" }
 => sub { "???" }

  DB<119> "$sub->()"
 => "CODE(0xa5cc200)->()"