sub whatever {
    ($var1,$var2,$etc) = @_;
...
}