#!/usr/bin/perl


while (<>) {
	@input = split(' ',$_);
	if ($input[0] =~ /^\d/) {
		print "$input[1] $input[5]\n";
		}
}
