File: hello.pl

package info (click to toggle)
fungw 1.2.2-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 2,268 kB
  • sloc: ansic: 24,257; makefile: 500; sh: 32; awk: 9; perl: 8; tcl: 7; javascript: 7; ruby: 7; python: 6
file content (12 lines) | stat: -rw-r--r-- 367 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
 
# Public function; atoi() is provided by another objects through fungw
sub hello {
	my($how_many, $who) = @_;
	print("Hello " . $how_many . " " . $who . "\n");
	print("atoi: " . atoi("42") . "\n");
	return 66;
}

print("hello world from init " . atoi("33") . "\n");

# register hello(), to be called from other objects and the host application
fgw_func_reg("hello");