#!/usr/bin/perl -w

use strict;
use FileHandle();
use POSIX qw(locale_h strftime);

my $cmd="touch /pfad/zu/einer/datei";
my $out = `$cmd`;