sub wanted {
    return if /^\./;
    ...

##</code><code>##

    return if /^\.$/;
##</code><code>##

    return if $_ eq '.';