#!perl -w
use strict;
warn "Calling a son...\n";

system( 1, "son.html" );