sub getFoo{
    my ($x,$y) = @_;
    $x . '_' . $y . '_testme.xml';
}