sub func {
  my ( $var ) = @_;
 
  ...

}