#!/usr/bin/perl

use 5.010;
use strict;
use warnings;

# open for write, append
open(my $fh,'>>','c:/temp/test.txt')or die "Can't open file: $!\n";    

print $fh "\n[ARTEC]\n".
          "IniFile=f:\\vaa\\basis\\vaa01.ini\n"
close($fh);