for (split(m!</element>!, $xml)) {
  next unless 
    m!<NetChange type='float'>([^<]*)<.*<LastTradePrice type='float'>([^<]*)<.*<LastTradeDate type='java.util.Date'>([^<]*)<!s;
  print "Net: $1, Price $2, Date $3\n";
}

__output__

Net: 9.06, Price 1420.2, Date 2002-11-18 07:01:00 CST
Net: 0.0, Price 7850.29, Date 2002-10-11 10:07:00 CDT
Net: 0.69, Price 910.52, Date 2002-11-18 07:01:00 CST
Net: 1.48, Price 387.4, Date 2002-11-18 07:01:00 CST
Net: 1.24, Price 620.239, Date 2002-11-18 06:24:00 CST