#!/usr/bin/perl

use strict;
use warnings;
use lib "C:/Perl64/lib/printname";
use printname;

printname("John");