The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/env perl

use strict;
use warnings;

use Path::Class;

my $fh = file("BEFORE_BUILD.txt")->openw();

close($fh);