# -*- perl -*-

#
# $Id: Telefonbuch98.pm,v 1.1 2000/04/29 01:15:20 eserte Exp $
# Author: Slaven Rezic
#
# Copyright (C) 1999 Slaven Rezic. All rights reserved.
# This package is free software; you can redistribute it and/or
# modify it under the same terms as Perl itself.
#
# Mail: eserte@cs.tu-berlin.de
# WWW:  http://user.cs.tu-berlin.de/~eserte/
#

# hier sollten Telefonbuch98-spezifische Variablen und Funktionen stehen...
package Telefonbuch98;
use strict;
use vars qw($VERBOSE);

sub database { 98 }

1;

__END__