$s = 1;
$a = [1,2,3];
$h = {a => 1, b => 2, c => 3};