Platon Technologies
neprihlásený Prihlásiť Registrácia
SlovakEnglish
open source software development oslavujeme 10 rokov vývoja otvoreného softvéru! Piatok, 29. marec 2024

Súbor: [Platon] / iotta / Iotta / Filter.pm (stiahnutie)

Revízia 1.1, Sun Feb 16 15:48:06 2003 UTC (21 years, 1 month ago) by yenar

Initial revision

package iotta::filter;

require iotta;

@ISA = ("iotta");

sub filter {
    my ($self, $d);
    $self = shift;
    $d = shift;
    #print STDERR "iotta::filter::filter called\n";
    return $d;
}

sub setup {
}

sub initialize {
    my $self = shift;
    $self->SUPER::initialize (@_);
    $self->{files}=".*";
    $self->{filename}="unknown";
    $self->{magic}="";
}

1;

Platon Group <platon@platon.sk> http://platon.sk/
Copyright © 2002-2006 Platon Group
Stránka používa redakčný systém Metafox
Na začiatok