#!/usr/bin/env perl

use strict;
use warnings;

#print ssh command
print STDERR '# ssh ' . join(' ', @ARGV) . "\n";

while (@ARGV){
    shift @ARGV && next if $ARGV[0] =~ /^-|=/;

    shift @ARGV;
    last;
}

system @ARGV;

1;

