use Astro::Coords;

  $c = new Astro::Coords( name => "My center",
                          ra   => '05:22:56',
                          dec  => '-26:20:40.4',
                          type => 'B1950'
                          units=> 'sexagesimal');
  $t = new Astro::Coords( name => "My target",
                          ra   => '05:22:56',
                          dec  => '26:20:40.4',
                          type => 'B1950'
                          units=> 'sexagesimal');
  print $c->distance($t);