#!/usr/bin/env perl use strict; use warnings; use autodie; use Cwd; use Stow; # Stow files my $dir = getcwd; my %stow_options = ( dir => $dir, target => $ENV{'HOME'}); my $stow = new Stow(%stow_options); my @pkgs = ('files'); $stow->plan_stow(@pkgs); # my %conflicts = $stow->get_conflicts(); $stow->process_tasks(); print "done\n";