print join ' ', $atob, $btoc, $atoc, "\n";