You didn't say which version of cpan you have, super search is your friend -> Re^4: pod2html: link (L<...>) formatting code (timeloop)

Thx, marto. I know that's not gonna quote well, but your link led to correction: choroba's response in Re^5: pod2html: link (L<...>) formatting code (timeloop). Essentially, the fix is:

rm /home/ken/.cpan/sources/authors/id/?/??/*/CHECKSUMS

Regarding Super Search, I haven't been able to make useful queries with it lately. Is that just me being Super Rusty?

Continuing:

root@laptop:~/.cpan# pwd /root/.cpan root@laptop:~/.cpan# ls sources/authors/id/?/??/*/CHECKSUMS sources/authors/id/B/BL/BLIAKO/CHECKSUMS ... sources/authors/id/C/CO/CORION/CHECKSUMS ... sources/authors/id/D/DA/DAGOLDEN/CHECKSUMS ... sources/authors/id/D/DC/DCANTRELL/CHECKSUMS ... sources/authors/id/D/DR/DROLSKY/CHECKSUMS ... sources/authors/id/M/MI/MIYAGAWA/CHECKSUMS ... sources/authors/id/R/RU/RURBAN/CHECKSUMS sources/authors/id/S/SA/SALVA/CHECKSUMS

Those are certainly the usual suspects, and when I have a problem implementing software with such names on it, I strongly suspect that the problem is local, either on my machine or between my ears. Proceeding:

root@laptop:~/.cpan# rm sources/authors/id/?/??/*/CHECKSUMS root@laptop:~/.cpan# ls sources/authors/id/?/??/*/CHECKSUMS ls: cannot access 'sources/authors/id/?/??/*/CHECKSUMS': No such file +or directory root@laptop:~/.cpan# cpan

Alles klar...und...

cpan[1]> install Astro::SIMBAD::Client

I went over this install very closely, reading many of the sources:

The simbadc script is a simple wrapper for Astro::SIMBAD::Client, whic +h may be used interactively or as a Unix filter. >>>> NOTICE <<<< As of version 0.032_01 the simbadc script is installed by default. If you do not wish it installed. run this script with the -n option. The +-y option is still accepted for backward compatibility. ... Running Build test for WYANT/Astro-SIMBAD-Client-0.046.tar.gz t/basic.t .... 1/? # http://simbad.u-strasbg.fr/: SIMBAD4 1.8 - 2022-1 +2 t/basic.t .... ok #I verified this one in the debugger t/release.t .. ok t/simple.t ... ok t/vo.t ....... ok t/yaml.t ..... ok All tests successful. Files=5, Tests=13, 65 wallclock secs ( 0.07 usr 0.01 sys + 1.59 cusr + 0.23 csys = 1.90 CPU) Result: PASS ... Installing /usr/local/share/perl/5.30.0/Astro/SIMBAD/Client.pm Installing /usr/local/share/perl/5.30.0/Astro/SIMBAD/Client/WSQueryInt +erfaceService.pm Installing /usr/local/man/man3/Astro::SIMBAD::Client.3pm Installing /usr/local/bin/simbadc WYANT/Astro-SIMBAD-Client-0.046.tar.gz ./Build install -- OK cpan[2]> quit

And then, and then, and gentleman and then:

root@laptop:~/.cpan# perl -MAstro::SIMBAD::Client -le '$s=Astro::SIMBA +D::Client->new;@q=split /\n/, $s->url_query(id => Ident => "$ARGV[0]" +, NbIdent => 1);@r=grep/ICRS/,@q;print for @r' aldebaran Coordinates(ICRS,ep=J2000,eq=2000): 04 35 55.23907 +16 30 33.4885 (Op +t ) A [7.38 5.70 90] 2007A&A...474..653V root@laptop:~/.cpan#

Q1) How can I repeat the tests in a comprehensive fashion?

I stepped through one of the tests in the debugger:

DB<1> n + main::(basic.t:8): require_ok 'Astro::SIMBAD::Client' main::(basic.t:9): or BAIL_OUT q{Can't do much testing if can't + load module}; DB<1> n + ok 1 - require Astro::SIMBAD::Client; main::(basic.t:12): my $smb = Astro::SIMBAD::Client->new (); DB<1> n + main::(basic.t:14): ok $smb, 'Instantiate Astro::SIMBAD::Client' main::(basic.t:15): or BAIL_OUT "Test aborted: $@"; DB<1> n + ok 2 - Instantiate Astro::SIMBAD::Client main::(basic.t:17): is $smb->get( 'debug' ), 0, 'Initial debug sett +ing is 0'; DB<1> n + ok 3 - Initial debug setting is 0 main::(basic.t:19): $smb->set( debug => 1 ); DB<1> p debug + debug DB<2> p $smb->get('debug') + 0 DB<3> n + main::(basic.t:21): is $smb->get( 'debug' ), 1, 'Able to set debug +to 1'; DB<3> n + ok 4 - Able to set debug to 1 main::(basic.t:23): $smb->set( debug => 0 ); DB<3> p $smb->get('debug') + 1 24 25 { 26: my $scheme = Astro::SIMBAD::Client::_is_scheme_valid( 27 $ENV{ASTRO_SIMBAD_CLIENT_SCHEME} ) ? 28 'http' : 29: lc $ENV{ASTRO_SIMBAD_CLIENT_SCHEME}; DB<6> n + main::(basic.t:26): my $scheme = Astro::SIMBAD::Client::_is_sch +eme_valid( main::(basic.t:27): $ENV{ASTRO_SIMBAD_CLIENT_SCHEME} ) ? main::(basic.t:28): 'http' : DB<6> c + ok 5 - Default scheme is 'http' # http://simbad.u-strasbg.fr/: SIMBAD4 1.8 - 2022-12 1..5 Debugged program terminated. Use q to quit or R to restart, use o inhibit_exit to avoid stopping after program termination, h q, h R or h o to get additional info. DB<6>

I lengthened Tom's one-liner to a lexical script:

#!/usr/bin/perl -w use v5.030; use Astro::SIMBAD::Client; use Data::Dumper; my $s = Astro::SIMBAD::Client->new; my @q = split /\n/, $s->url_query( id => Ident => "$ARGV[0]", NbIdent +=> 1 ); my @r = grep /ICRS/, @q; print Dumper(@r); #print Dumper(@q);

Output with various choices of ARGV, and a few (edited) runs dumping @q:

fritz@laptop:~/Documents$ ./1.simbad.pl Aldebaran $VAR1 = 'Coordinates(ICRS,ep=J2000,eq=2000): 04 35 55.23907 +16 30 33 +.4885 (Opt ) A [7.38 5.70 90] 2007A&A...474..653V'; fritz@laptop:~/Documents$ ./1.simbad.pl Betelgeuse $VAR1 = 'Coordinates(ICRS,ep=J2000,eq=2000): 05 55 10.30536 +07 24 25 +.4304 (Opt ) A [9.04 5.72 90] 2007A&A...474..653V'; ... fritz@laptop:~/Documents$ ./1.simbad.pl Mintaka $VAR1 = 'Coordinates(ICRS,ep=J2000,eq=2000): 05 32 00.40009 -00 17 56 +.7424 (Opt ) A [4.92 2.38 90] 2007A&A...474..653V'; $VAR1 = 'C.D.S. - SIMBAD4 rel 1.8 - 2023.01.01CET05:30:56'; $VAR2 = ''; $VAR3 = 'Mintaka'; $VAR4 = '-------'; $VAR5 = ''; $VAR6 = 'Object * del Ori --- SB* --- OID=@799898 (@@17013,0) - +-- coobox=6469'; $VAR7 = ''; $VAR8 = 'Coordinates(ICRS,ep=J2000,eq=2000): 05 32 00.40009 -00 17 56 +.7424 (Opt ) A [4.92 2.38 90] 2007A&A...474..653V'; $VAR9 = 'Coordinates(FK4,ep=B1950,eq=1950): 05 29 27.02698 -00 20 04. +4178'; $VAR10 = 'Coordinates(Gal,ep=J2000,eq=2000): 203.85592217 -17.7397340 +0 '; $VAR11 = 'hierarchy counts: #parents=2, #children=2, #siblings=0'; $VAR12 = 'Proper motions: 0.64 -0.69 [0.56 0.27 0] A 2007A&A...474..65 +3V'; $VAR13 = 'Parallax: 4.71 [0.58] A 2007A&A...474..653V'; ... fritz@laptop:~/Documents$ ./1.simbad.pl Alnilam $VAR1 = 'Coordinates(ICRS,ep=J2000,eq=2000): 05 36 12.81335 -01 12 06 +.9089 (Opt ) A [3.69 1.67 90] 2007A&A...474..653V'; ... $VAR3 = 'Alnilam'; $VAR8 = 'Coordinates(ICRS,ep=J2000,eq=2000): 05 36 12.81335 -01 12 06 +.9089 (Opt ) A [3.69 1.67 90] 2007A&A...474..653V'; fritz@laptop:~/Documents$ ./1.simbad.pl Alnitak $VAR1 = 'Coordinates(ICRS,ep=J2000,eq=2000): 05 40 45.52666 -01 56 33 +.2649 (Opt ) A [5.19 2.29 90] 2007A&A...474..653V';

Finally, while I am writing up this simbad install project with what I'm calling success, the site and the client that gets it seem to be going just fine SOAP or no SOAP. (I still don't know what that is.) marto was completely correct that the interface had nothing to do with the problem reported. This is how you get this info with your browser:

https://simbad.cds.unistra.fr/simbad/sim-id?Ident=betelgeuse&submit=su +bmit+id

or betelgeuse.

Thanks all for comments,


In reply to Re^2: cpan warning for XML::DoubleEncodedEntities by Aldebaran
in thread cpan warning for XML::DoubleEncodedEntities by Aldebaran

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.