samples/Perl/perl-test.t


1
2
3
4
5
6
7
8
9
10

use strict;
use warnings;

use Foo::Bar

$n = 42;
$name = "world";
@array = ("1","2","3");
%hash = ("foo":"bar");
my $name = "josh";