#!/usr/bin/perl use    strict; use     warnings;         &nb sp;              &nb sp;              &nb sp;     test(); sub    test          &n bsp;         {         print "einfach mal ein Test"; }