3DPrinting/PrusaSlicer-NonPlainar
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed converting of Unicode codepoint (\uXXXX) into a character in Perl.

Browse Source
This commit is contained in:
YuSanka 2018-02-16 10:29:28 +01:00
parent 1167458acd
commit 53006384d5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
utils/post-processing/flowrate.pl
View File

@ -25,7 +25,7 @@ while (<>) {
my $mm_per_mm = $e_length / $dist; # dE/dXY my $mm_per_mm = $e_length / $dist; # dE/dXY
my $mm3_per_mm = ($filament_diameter[$T] ** 2) * PI/4 * $mm_per_mm; my $mm3_per_mm = ($filament_diameter[$T] ** 2) * PI/4 * $mm_per_mm;
my $vol_speed = $F/60 * $mm3_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; $dist, $e_length, $mm_per_mm, $vol_speed;
s/(\R+)/$comment$1/; s/(\R+)/$comment$1/;
} }