#!/usr/bin/perl
use strict;

my %hoa = (
"arraya" => [ "dd1", "dd2", "dd3", "dd4" ],
"arrayb" => [ "gg1", "gg2", "gg3", "gg4" ],
"arrayc" => [ "cc1", "cc2", "cc3", "cc4" ]
);


my $input = <STDIN>;
 chomp $input;

 
if ((exists $hoa{$input}) and $input eq (@{$hoa{arraya}}))
{
print (@{$hoa{arraya}});
}