Need to implement perl code in tpl

Hi,
A line perl code for the substitution i.e. $value=~ s/ / /gi;

i need this code in a perl fucntion. And in the tpl i need to call this function.
could you please tell me how to implement the fucntion in presentation template?

Thank you

Find more posts tagged with

Comments

Adam Stoller

Hi,
A line perl code for the substitution i.e. $value=~ s/*/ /gi;

i need this code in a perl fucntion. And in the tpl i need to call this function.
could you please tell me how to implement the fucntion in presentation template?

Thank you

Please do not cross-post the same question in multiple forums.

Migrateduser

Hi,
A line perl code for the substitution i.e. $value=~ s/*/ /gi;

i need this code in a perl fucntion. And in the tpl i need to call this function.
could you please tell me how to implement the fucntion in presentation template?

Thank you

You should create and store your custom perl modules in this location.

iwhome\iw-perl\site\lib

Here is an example module (easily found on the internet) and a file that calls it (while passing params).

[PHP]
# MyModule.pm
package MyModule;

sub helloworld {
my ( $name ) = @_;
print "Hello, $name\n";
}

1;

# main.pl
use MyModule;
MyModule::helloworld( 'Jim' );
[/PHP]