Select Code to Download

sub get_meta_keywords {
  my ($script,$parameter) = @_;

...
    
  return $meta_keywords;
}

#!/usr/bin/perl -w

my @keywords = qw(one two three);
...
print $meta_keywords, "\n";

exit;

sub get_meta_keywords {
  ...
  
...
  
  return $meta_keywords;
}