my %hash = @_;

$hash{'from'} ||= 0;

if ($hash{'from'} eq 'main') {
   # code
}