or download this
C:\Users\jkeys>perl c:\myperl\usgsfeed_norules.pl
Use of uninitialized value in concatenation (.) or string at c:\myperl
+\usgsfeed_norules.pl line 25.
...
id is urn:earthquake-usgs-gov:us:c000hk85, updated at 2013-06-10T19:54
+:48.457Z, georss:point is 5.2973 126.0703
Magnitude 4.6 about 60km WNW of Lata, Solomon Islands
id is urn:earthquake-usgs-gov:us:c000hk60, updated at 2013-06-10T16:28
+:39.451Z, georss:point is -10.4972 165.3268