Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
Citronalco
FM4-7Tage-Download
Commits
6040dda2
Commit
6040dda2
authored
Nov 11, 2017
by
Bernhard Geier
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
remove spaces around show title
parent
9c6da098
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
1 addition
and
1 deletion
+1
-1
fm4-7tage-download.pl
fm4-7tage-download.pl
+1
-1
No files found.
fm4-7tage-download.pl
View file @
6040dda2
...
...
@@ -37,7 +37,7 @@ my $result=JSON->new()->utf8->decode($browser->content());
foreach
(
@
{
$result
->
{'
hits
'}})
{
$browser
->
get
(
$_
->
{'
data
'}
->
{'
href
'});
my
$data
=
JSON
->
new
()
->
utf8
->
decode
(
$browser
->
content
());
my
$title
=
$data
->
{'
title
'};
my
(
$title
)
=
$data
->
{'
title
'}
=~
/^\s*(.+?)\s*$/
;
next
unless
$title
=~
/$SENDUNG/i
;
# Filter out results not containing the query string in the title
my
$broadcastDate
=
POSIX::
strftime
("
%Y-%m-%d
",
localtime
(
$data
->
{'
start
'}
/
1000
));
my
$description
=
$removeHtml
->
parse
((
$data
->
{'
description
'})
or
$broadcastDate
);
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment