foreach my $g (@gists) {
        my @files = keys(%{$g->{files}});	
	my $file = $files[0];
        # $file is now main.html

	print $g->{files}->{$file}->{raw_url};
        # ^^ THIS doesn't work!!!
}