$ntp_str = `b2status -ti`;
$ber = (split(/\n/,$ntp_str))[6];
$ber = (split(/ +/,$ber))[3];
$ber = int (1000000 * $ber);
print "0\n";
print "$ber\n";
print "0\n";
print "0\n";

$ntp_str = `b2status -ti`;
$qual = (split(/\n/,$ntp_str))[4];
$qual = (split(/ +/,$qual))[4];
$snr = (split(/\n/,$ntp_str))[5];
$snr = 10 * (split(/ +/,$snr))[3];
$snr = int ($snr);
print "$qual\n";
print "$snr\n";
print "0\n";
print "0\n";