perl -Mstrict -MVarz -we "our($User, $Password, $Url, $Prefix); map{ $main::{$_} = $Varz::{$_} } keys %Varz:: ; print join qq(\n),$User, $Password, $Url, $Prefix" Joe Secret123 www.example.com EX