#!/usr/bin/perl -w

our $money = 20000;

1;