DB<1> $_ = "PID: , VID: 255, SN: AGM163923J5";

  DB<2> print $_ unless /PID: ,/;

  DB<3>