#!%PERL%

use strict;

use lib '%VHFFS_LIB_DIR%';
use Vhffs::Functions;
use Vhffs::Main;
use Data::Dumper;

my $main = init Vhffs::Main;


my $username = "soda";

print Vhffs::Functions::hash_homename( $username , $main );

