sub greet declares a name. @_ holds arguments.

Goal

Write greet and a units total.

use strict;
use warnings;
use feature 'say';

sub greet {
  my ($name) = @_;
  return "Hello, $name";
}
say greet("Nairobi");

use strict;
use warnings;
use feature 'say';

sub total {
  my ($units, $price) = @_;
  return $units * $price;
}
say total(12, 40);

use strict;
use warnings;
use feature 'say';

sub label {
  my ($city) = @_;
  $city //= "Nairobi";
  return "$city kiosk";
}
say label();
say label("Kisumu");

use strict;
use warnings;
use feature 'say';

sub add {
  my ($a, $b) = @_;
  return $a + $b;
}
say add(8, 5);