#!/usr/bin/perl
use warnings;
use strict;

use Data::Dumper qw(Dumper);

chdir('/home/alex/Documenti');
system('dir');