#!/bin/bash

DIR=`readlink -f $0`

BETA=`perl -e'$ARGV[0] =~ m~\/beta\..+?\.(\d+)\/~; print $1' $DIR`

HOST=`hostname | sed -e 's/ppcdev/beta/'`

BASE_URL=https://$BETA.$HOST.direct.yandex.ru:14443
URL=$BASE_URL/v5
JSON_URL=$BASE_URL/json/v5

function join {
   perl -e '$s = shift @ARGV; print join($s, @ARGV);' "$@"; 
}

