You can use a hash slice with only one key:

@h{ /\w$/g } += $_ while <DATA>;
[download]

But I find it quite ugly. What about split?

$h{ (split)[1] } += $_ while <DATA>;
[download]