#!/usr/bin/perl

use strict;
use warnings;

my $re;
my $qu;
 $re = $ARGV[0];
 $qu = $ARGV[1];

print $re,"\t",$qu,"\n";