The SSH host key has changed on 8 April, 2022 to this one: SHA256:573uTBSeh74kvOo0HJXi5ijdzRm8me27suzNEDlGyrQ

Add full UTF-8 support to Perl example

timestamp-validity
gitolite tester 8 years ago
parent 5b7124aca5
commit fc1a6328f1
  1. 5
      examples/basic.pl

@ -1,11 +1,15 @@
#!/bin/env perl
package SweGlib;
use utf8;
use strict;
use POSIX;
use Glib::Object::Introspection;
use Data::Dumper;
binmode STDOUT, ':encoding(UTF-8)';
Glib::Object::Introspection->setup(basename => 'SweGlib', version => '2.0', package => 'SweGlib');
package main;
@ -51,4 +55,3 @@ foreach my $antiscion (@{$all_antiscia}) {
printf("%s is antiscion of %s on axis %s (±%.2f%%)\n", $planet1->get_planet_info()->get_name(), $planet2->get_planet_info()->get_name(), $antiscion->get_antiscion_axis_info()->get_name(), $antiscion->get_difference());
}
}

Loading…
Cancel
Save