#!/usr/bin/perl -w
use strict;

my $output;
$output = `./skript1.pl`;
print $output;