($foo) = ($variable =~ /^(.*)$/g);