This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| my $dom = Mojo::DOM->new($content); | |
| my @e = $dom->find('table tr th a[href]')->each; | |
| my $items = []; | |
| foreach my $element (@e) { | |
| if ( $element =~ /cgi/ ) { | |
| my $item = $element->text; | |
| my $distance = $element->parent->next->next->next->text; | |
| my $altitude = $element->parent->next->next->next->next->text; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| $(function () { | |
| $( document ).tooltip({ | |
| content: function () { | |
| return $(this).not('#some_div *[title]').prop('title'); | |
| } | |
| }); | |
| }); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| var tableContainer = $(".dataTables"); | |
| tableContainer.dataTable({ | |
| "bPaginate" : false, | |
| "bAutoWidth" : false, | |
| "fnPreDrawCallback": function () { | |
| if (!responsiveHelper) { | |
| responsiveHelper = new ResponsiveDatatablesHelper(tableContainer, breakpointDefinition); | |
| } | |
| }, | |
| "fnRowCallback": function (nRow, aData, iDisplayIndex, iDisplayIndexFull) { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| $('#workloadItems').text( workloadTable.fnSettings().fnRecordsTotal() ); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| var workloadTable = $(".dataTables").dataTable({ | |
| "sDom" : '<"top"plf<"workload_filter"><"clear">>rt<"bottom"ipl<"clear">>', | |
| "aaSorting" : [[ 5, "desc" ]], | |
| "aoColumns" : [ | |
| { "sWidth": "250px" }, | |
| { "sWidth": "144px", "sType":"title-string" }, | |
| { "sWidth": "300px" }, | |
| { "sWidth": "125px" }, | |
| { "sWidth": "150px" }, | |
| { "sWidth": "150px" }, |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| if (!Array.prototype.last){ | |
| Array.prototype.last = function(){ | |
| return this[this.length - 1]; | |
| }; | |
| }; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| if (!Array.prototype.clear){ | |
| Array.prototype.clear = function() { | |
| while (this.length > 0) { | |
| this.pop(); | |
| } | |
| }; | |
| }; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/local/bin/perl | |
| use JSON; | |
| $jsonData = new JSON; | |
| open my $fh, '<', "/home/slippert/settings.json"; | |
| my $rawJSONData = do { local $/; <$fh> }; | |
| eval{ $dataModel = $jsonData->utf8->decode($rawJSONData); }; | |
| close $fh; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/local/bin/perl | |
| use JSON; | |
| $jsonData = new JSON; | |
| open my $fh, '<', "/home/slippert/settings.json"; | |
| my $rawJSONData = do { local $/; <$fh> }; | |
| eval{ $dataModel = $jsonData->decode($rawJSONData); }; | |
| close $fh; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| use strict; | |
| use warnings; | |
| use URI; | |
| use LWP::Simple; | |
| use File::Spec; | |
| use File::Copy; | |
| use Win32::TieRegistry ( Delimiter=>"/", ArrayValues=>1 ); | |
| use Data::Dumper; | |
| use 5.14.0; | |
| my $debug = 0; |