$x = \substr("blah", 1, 2);
$y = \substr("florp", 1, 3);
print "$$x $$y\n";