Skip to content

Support for UTF-8 strings in labels/title #74

@zmughal

Description

@zmughal

Due to using syswrite() strings must be passed as UTF-8 encoded bytes:

An example where this is a problem with a workaround:

#!/usr/bin/env perl

use utf8;
use Encode;
use PDL;
use PDL::Graphics::Gnuplot;
use PDL::Constants qw(PI);

sub plot_sin {
	my ($w, $coeff) = @_;
	my $xrange = [ -2*PI, 2*PI ];
	my $x = zeroes(1e3)->xlinvals(@$xrange); my $y = sin($coeff * 2 * PI * $x );

	my $title = "y = sin( $coeff * 2π  * x )";
	# to get around sending text through syswrite()
	my $title_octets = encode('UTF-8', $title);

	$w->plot(with=>'lines', $x, $y, {
		xrange => $xrange,
		title => $title_octets, # can not pass $title as-is
	});
}

Metadata

Metadata

Assignees

Labels

No labels
No labels

Type

No type

Projects

No projects

Milestone

No milestone

Relationships

None yet

Development

No branches or pull requests

Issue actions