From 53006384d582260f6f8bb1127fda49f0a9233635 Mon Sep 17 00:00:00 2001 From: YuSanka Date: Fri, 16 Feb 2018 10:29:28 +0100 Subject: [PATCH] Fixed converting of Unicode codepoint (\uXXXX) into a character in Perl. --- utils/post-processing/flowrate.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/utils/post-processing/flowrate.pl b/utils/post-processing/flowrate.pl index 4d742631e..f29d2312d 100755 --- a/utils/post-processing/flowrate.pl +++ b/utils/post-processing/flowrate.pl @@ -25,7 +25,7 @@ while (<>) { my $mm_per_mm = $e_length / $dist; # dE/dXY my $mm3_per_mm = ($filament_diameter[$T] ** 2) * PI/4 * $mm_per_mm; my $vol_speed = $F/60 * $mm3_per_mm; - my $comment = sprintf ' ; dXY = %.3fmm ; dE = %.5fmm ; dE/XY = %.5fmm/mm; volspeed = %.5fmm\u00B3/sec', + my $comment = sprintf ' ; dXY = %.3fmm ; dE = %.5fmm ; dE/XY = %.5fmm/mm; volspeed = %.5fmm\x{00B3}/sec', $dist, $e_length, $mm_per_mm, $vol_speed; s/(\R+)/$comment$1/; }