Program Structure

Introduction

Before diving into variables and data types, it helps to understand the basic anatomy of a Perl program: how statements are separated, how comments work, and how output is typically organized. These building blocks will appear in literally every script you write from here on.

Statements and Semicolons

A Perl program is a sequence of statements, and every simple statement must end with a semicolon (;). The semicolon is what tells the interpreter "this instruction is complete, move to the next one" — Perl does not use line breaks to separate statements the way some other languages do.

use strict;
use warnings;

my $first  = "one statement";
my $second = "another statement"; my $third = "yet another"; # multiple statements, one line

print "$first\n$second\n$third\n";

Notice that $second and $third are declared on the same physical line, separated only by semicolons. This is legal Perl, though for readability most style guides recommend one statement per line, as shown for $first.

Whitespace and Formatting

Perl is generally whitespace-insensitive between tokens: extra spaces, tabs, and blank lines are ignored by the interpreter and exist purely for human readability. Unlike Python, indentation carries no functional meaning in Perl — code blocks are instead delimited by curly braces { }, which you will see starting with the conditional statements lesson right after this course.

Even though whitespace is not functionally required, consistent indentation (commonly four spaces per level) makes Perl code dramatically easier to read, especially as scripts grow larger.

Comments

Comments are notes in your source code that Perl ignores completely when running the script. They exist purely to help humans (including your future self) understand the code.

A single-line comment starts with a # character and continues to the end of that line.

use strict;
use warnings;

# This calculates a simple discount price
my $price = 50;       # original price in dollars
my $discount = 0.20;   # 20% off

my $final_price = $price - ($price * $discount);
print "Final price: \$$final_price\n";

For multi-line comments, Perl has no dedicated block-comment syntax like /* */, but the common convention is Plain Old Documentation (POD) markers, which are also used for real documentation.

=begin comment
This entire block, from =begin to =end,
is ignored by the Perl interpreter.
Useful for temporarily disabling a large chunk of code.
=end comment
=cut

Typical Script Layout

While Perl does not enforce a strict structure, professional scripts tend to follow a consistent, predictable order.

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

# --- Constants / configuration ---
my $greeting = "Hello";

# --- Subroutine definitions ---
sub build_message {
    my ($name) = @_;
    return "$greeting, $name!";
}

# --- Main program logic ---
my $message = build_message("Perl Learner");
print "$message\n";

We will cover subroutines like build_message in depth in a later lesson — for now, just notice how the file reads top to bottom in a predictable order: setup, definitions, then execution.

The print Function in Detail

print is the workhorse of Perl output. It can take a single value, multiple comma-separated values, or a list, and prints them one after another with no automatic separator or trailing newline unless you add one yourself.

use strict;
use warnings;

my $name = "Perl";
my $year = 1987;

print "Language: ", $name, ", Created: ", $year, "\n";
print "Language: $name, Created: $year\n";

Both lines above print the same result. The first passes several separate comma-separated arguments to print; the second relies on string interpolation, where variable names embedded directly inside a double-quoted string are automatically replaced with their values. We will explore interpolation fully in the next lesson on scalars.

Common Mistakes

Best Practices

Frequently Asked Questions

Key Takeaways

Summary

You now understand the basic shape of a Perl program. The next lesson dives into scalars — the fundamental variable type in Perl, marked with the $ sigil — where you will learn how Perl stores and interpolates individual values.