psrcat2json.pl   psrcat2json.pl 
skipping to change at line 37 skipping to change at line 37
# #
# read psrcat.db from ATNF Pulsar Catalogue and convert to JSON # read psrcat.db from ATNF Pulsar Catalogue and convert to JSON
# URL: http://www.atnf.csiro.au/research/pulsar/psrcat/download.html # URL: http://www.atnf.csiro.au/research/pulsar/psrcat/download.html
# #
use Math::Trig; use Math::Trig;
$PSRCAT = "./psrcat.db"; $PSRCAT = "./psrcat.db";
$JSON = "./pulsars.json"; $JSON = "./pulsars.json";
$FORMAT = 2; $FORMAT = 2;
$CATVER = 1.52; $CATVER = 1.53;
open (PSRCAT, "<$PSRCAT"); open (PSRCAT, "<$PSRCAT");
@catalog = <PSRCAT>; @catalog = <PSRCAT>;
close PSRCAT; close PSRCAT;
$psrcat = ""; $psrcat = "";
foreach $s (@catalog) { foreach $s (@catalog) {
$psrcat .= $s; $psrcat .= $s;
} }
 End of changes. 1 change blocks. 
1 lines changed or deleted 1 lines changed or added

This html diff was produced by rfcdiff 1.41. The latest version is available from http://tools.ietf.org/tools/rfcdiff/