#!/usr/bin/perl

# CADUBI - Creative ASCII Drawing Utility By Ian   
# Ian Langworth <catrap@bigfoot.com>
# Logical Lemon Productions: www.logicallemon.com
#
# Copyright (c) 2000 Ian Langworth. All rights reserved.
# This program is free software; you can redistribute it
# and/or modify it under the same terms as Perl itself.
#
# This is supposed to be an executable, so 'chmod 755 cadubi'
#
# Plese see CADUBI.pl for credits and such!
#

########################################################################
# SETUP

# Don't like beeping? Change this to 0.
$AUDIBLE = 1;

# Any additional command line options?
# Be sure to run 'cadubi --help' first.
$ADD_OPS = '';




########################################################################
# EXECUTION (Don't modify below this line.)
use FindBin qw($Bin); use lib "$Bin/../lib";
my $CADUBI_Arguments = undef;
$CADUBI_Arguments .= ' --mute' unless $AUDIBLE;
$CADUBI_Arguments .= ' '.$ADD_OPS if $ADD_OPS;
exec ('perl '.$Bin.'/../libexec/CADUBI.pl'.$CADUBI_Arguments.' '.join(' ',@ARGV));

