for my $ftype (qw/ AFile ExistingFile /) {
    coerce  $ftype =>
        from 'Str' =>
        via { file($_) };
}