#!/usr/bin/perl

use strict;
use warnings;

methode('Param1','Param2');

sub methode{
  print $_,"\n" for(@_);
}