#!/usr/bin/perl

exec '/usr/bin/perl', '-T', '386513.pl', 'number=4' or
 die "Cannot execute : $!";