source: trunk/zoo-project/zoo-services/hello-perl/Hello.pl @ 317

sub HelloPL {
        my ($main_conf,$real_inputs,$real_outputs) = @_;
        
        $real_outputs->{"Result"}->{"value"}=$real_inputs->{"a"}->{"value"};
        return 3;
}