Select Code to Download

>perl 848064_xyz.pl 'egal("20090316","7006")'


...

++++
>

#!/usr/bin/perl
use strict;
use warnings;
...


egal($param);         # call the sub!