#!/usr/bin/perl use strict; use autodie; my $mib2c_config = 'src/mysqlstat-mib.mib2c'; die "This file must be run from Mysqlstat top level source directory" unless -r $mib2c_config; print "$0: creating ancillary directories and files\n"; foreach my $dir ('m4', 'build-aux') { mkdir($dir) unless -d $dir; } unless (-f 'ChangeLog') { open(my $fd, '>', 'ChangeLog'); print $fd <