#!/usr/bin/perl

use warnings;
use strict;

foreach my $arg (@ARGV) {
    print "Argument: $arg\n";
}