my $var = foo('some_text_for_instance');


sub foo
   {
    my $text = $_[0];

    return 'bar';
   }