#!/usr/bin/env perl

use strict;
use warnings;
use Shipwright;
use Shipwright::Script;

local $SIG{INT} = sub { warn "Stopped\n"; exit; };
Shipwright::Script->dispatch();