my $ftp = Net::FTP->new( "some.host.name", Hash => 1);

##</code><code>##

  $ftp->hash( 1 );