topical media & game development
[] readme course(s) preface I 1 2 II 3 4 III 5 6 7 IV 8 9 10 V 11 12 afterthought(s) appendix reference(s) example(s) resource(s) _

talk show tell print

mashup-gmaps-ch11-02.pl / pl



  #!/usr/bin/perl
  
  my points = [
                {x =>     -0.6394,
                 y =>     52.9114,
                 title => 'China Inn'},
                {x =>     -0.64,
                 y =>     52.909444,
                 title => 'One on Wharf'},
                {x =>     -0.64454,
                 y =>     52.91066,
                 title => 'Hop Sing'},
                {x =>     -0.642743,
                 y =>     52.9123959,
                 title => 'Nicklebys'},
                {x =>     -0.6376,
                 y =>     52.9073,
                 title => 'Siam Garden'},
                ];
  
  print '<markers>';
  
  foreach my point (@{points})
  {
      printf('<marker lat="\%f" lng="\%f" title="\%s"/>',
             point->{y},
             point->{x},
             point->{title});
  }
  
  print '</markers>';
[] readme course(s) preface I 1 2 II 3 4 III 5 6 7 IV 8 9 10 V 11 12 afterthought(s) appendix reference(s) example(s) resource(s) _

(C) Æliens 20/2/2008

You may not copy or print any of this material without explicit permission of the author or the publisher. In case of other copyright issues, contact the author.