#!/usr/bin/perl

use warnings;
use strict;

if ($^O eq "linux") {
    print "Das ist Linux.\n";
} else {
    print "Das ist nicht Linux.\n";
}