Help for this page

Select Code to Download

Select or download this

# perl -wT
# ^ whatever executable's appropriate!
use strict;

Select or download this

  if (param) 
  {
    $user_name = em(param('name'));
    &file_creation($user_name);
  }