#!/usr/bin/env perl
# $Id: mksymtree,v 2.2 2011/11/06 02:53:58 friedman Exp $

$^W = 1; # enable warnings

use FindBin;
use lib "$FindBin::Bin/../../lib/perl";
use lib "$ENV{HOME}/lib/perl";

use NF::FileUtil qw(:symlink);

$NF::FileUtil::verbose = 1;

sub main
{
  mksymlinktree ($_[0], $_[1]);
}

main (@ARGV);

1;