HEX
Server: Apache
System: Linux pdx1-shared-a1-38 6.6.104-grsec-jammy+ #3 SMP Tue Sep 16 00:28:11 UTC 2025 x86_64
User: mmickelson (3396398)
PHP: 8.1.31
Disabled: NONE
Upload Files
File: //usr/share/perl5/App/Ack/Filter/Default.pm
package App::Ack::Filter::Default;

=head1 NAME

App::Ack::Filter::Default

=head1 DESCRIPTION

The class that implements the filter that ack uses by
default if you don't specify any filters on the command line.

=cut

use strict;
use warnings;
use parent 'App::Ack::Filter';

sub new {
    my ( $class ) = @_;

    return bless {}, $class;
}

sub filter {
    my ( undef, $file ) = @_;

    return -T $file->name;
}

1;