sub blablabla()
{
    ...
    $var = "123";
    ...
}