if ($ARGV[0] eq "Example") {
open my $out, '>', "$outfile" or die "$!"
}