#!/usr/bin/perl -w

use strict;

$main::Robert = "el jefe";
print "\$main::Robert = $main::Robert\n";