my( $mon, $day, $time, $interface, $rate, $duplex, $lpa ) = @{^CAPTURE};