#!/usr/local/bin/perl
# Jaime Prilusky, 2003

use warnings;

  my $a = 4;
  my $b = 5;
  my $c;

  my $sum = $a + $b + $c; 

  print "sum: $sum\n";