#!/usr/bin/perl

use lib '/tmp/bh';

use openFile qw/openfile/;
use writeFile qw /writefile/;

openfile;
writefile;
close (TEST);