sub mehtod($)
{
    my $y = @_;
    my $x = "";  # or    
    my $x = 0;   # then    
    if(/expression/)
    {
      $x = $y;
    }
}