perl -le '$g = "";$sk = \$g; $$sk .= " WELT"; print $$sk;'