Commit 27e5df98 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Fix(?) UTF-8 issues with bin/efa. Nobody knows why it works.

parent 32216d9c
Loading
Loading
Loading
Loading
+1 −4
Original line number Diff line number Diff line
@@ -4,10 +4,8 @@
##   0. You just DO WHAT THE FUCK YOU WANT TO.
use strict;
use warnings;
use encoding 'utf8';
use 5.010;

use Encode;
use Getopt::Long qw/:config no_ignore_case/;
use HTML::TreeBuilder::XPath;
use WWW::Mechanize;
@@ -308,9 +306,8 @@ else {
		fields => \%post,
	);

	$content = $www->content;
	$content = $www->response()->decoded_content();
	$content =~ s/\xa0/ /gs;
	$content = decode('iso-8859-1', $content);
}

if ($test_dump) {
+90 −90

File changed.

Preview size limit exceeded, changes collapsed.

+193 −193

File changed.

Preview size limit exceeded, changes collapsed.

+81 −81

File changed.

Preview size limit exceeded, changes collapsed.

+81 −81

File changed.

Preview size limit exceeded, changes collapsed.

Loading