Language Basics Perl

#!/usr/bin/perl
use warnings;
{
    print "This is a first level block. \n";
    {
        print "    This is a second level block. \n";
    }
}