#!/usr/bin/env perl
use strict;
warn "ok from $0\n";