Commits

Toby Inkster committed 782cce6 Draft

I hate warnings

Comments (0)

Files changed (50)

lib/HTML/Microformats.pm

 package HTML::Microformats;
 
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::HTML5::Parser;

lib/HTML/Microformats/Datatype/DateTime/Parser.pm

 
 package HTML::Microformats::Datatype::DateTime::Parser;
 
-use strict;
+use strict; no warnings;
 
 use Carp qw( croak );
 use DateTime;
      
     no strict 'refs';
     my $year = ( $p{ self }{ base_datetime } || DateTime->now )->year;
-    use strict;
+    use strict; no warnings;
 
     $year =~ s/.$//;
     $p{ parsed }{ year } =  $year . $p{ parsed }{ year };
             ? $p{ self }{ cut_off_year } : $p{ self }->DefaultCutOffYear;
         $p{ parsed }{ year } += $p{ parsed }{ year } > $cutoff ? 1900 : 2000;
     }
-    use strict;
+    use strict; no warnings;
 
     return 1;
 }
     no strict 'refs';
     $p{ parsed }{ minute } = ( $p{ self }{ base_datetime } || DateTime->now )->minute;
     $p{ self }{ missing_details }{ minute } = 1;
-    use strict;
+    use strict; no warnings;
 
     return 1;
 }
     no strict 'refs';
     $p{ parsed }{ hour } = ( $p{ self }{ base_datetime } || DateTime->now )->hour;
     $p{ self }{ missing_details }{ hour } = 1;
-    use strict;
+    use strict; no warnings;
 
     return 1;
 }
     no strict 'refs';
     $p{ parsed }{ day } = ( $p{ self }{ base_datetime } || DateTime->now )->day;
     $p{ self }{ missing_details }{ day } = 1;
-    use strict;
+    use strict; no warnings;
 
     return 1;
 }
     no strict 'refs';
     $p{ parsed }{ week } = ( $p{ self }{ base_datetime } || DateTime->now )->week;
     $p{ self }{ missing_details }{ week } = 1;
-    use strict;
+    use strict; no warnings;
 
     return 1;
 }
     no strict 'refs';
     $p{ parsed }{ month } = ( $p{ self }{ base_datetime } || DateTime->now )->month;
     $p{ self }{ missing_details }{ month } = 1;
-    use strict;
+    use strict; no warnings;
 
     return 1;
 }
     no strict 'refs';
     $p{ parsed }{ year } = ( $p{ self }{ base_datetime } || DateTime->now )->year;
     $p{ self }{ missing_details }{ year } = 1;
-    use strict;
+    use strict; no warnings;
 
     return 1;
 }

lib/HTML/Microformats/Datatype/Duration.pm

 
 package HTML::Microformats::Datatype::Duration;
 
-use strict;
+use strict; no warnings;
 use overload '""'=>\&to_string, '+'=>\&add, '-'=>\&subtract, '<=>'=>\&compare, 'cmp'=>\&compare;
 
 use base qw(Exporter HTML::Microformats::Datatype);
 				$X->{$big}    =  $int_part;
 				$X->{$small} += ($mult * $frac_part);
 			}
-			use strict;
+			use strict; no warnings;
 			$X->{'n'} = int($X->{'n'});
 	
 			# Construct and return object.
 			$X->{$big}    =  $int_part;
 			$X->{$small} += ($mult * $frac_part);
 		}
-		use strict;
+		use strict; no warnings;
 		$X->{'n'} = int($X->{'n'});
 		
 		# Construct and return object.

lib/HTML/Microformats/Datatype/Interval.pm

 package HTML::Microformats::Datatype::Interval;
 
 use overload '""'=>\&to_string, '<=>'=>\&compare, 'cmp'=>\&compare;
-use strict;
+use strict; no warnings;
 
 use base qw(Exporter HTML::Microformats::Datatype);
 our @EXPORT    = qw();

lib/HTML/Microformats/Datatype/RecurringDateTime.pm

 
 use HTML::Microformats::Utilities qw(searchClass stringify);
 use base qw(HTML::Microformats::Datatype);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Datatype::DateTime;

lib/HTML/Microformats/Datatype/String.pm

 
 package HTML::Microformats::Datatype::String;
 
-use strict;
+use strict; no warnings;
 use overload '""'=>\&to_string, '.'=>\&concat, 'cmp'=>\&compare;
 
 use base qw(Exporter HTML::Microformats::Datatype);

lib/HTML/Microformats/DocumentContext.pm

 package HTML::Microformats::DocumentContext;
 
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Data::UUID;

lib/HTML/Microformats/Format.pm

 package HTML::Microformats::Format;
 
 use base qw(HTML::Microformats::Mixin::RDF);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Carp;

lib/HTML/Microformats/Format/OpenURL_COinS.pm

 package HTML::Microformats::Format::OpenURL_COinS;
 
 use base qw(HTML::Microformats::Format);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use CGI;

lib/HTML/Microformats/Format/RelEnclosure.pm

 package HTML::Microformats::Format::RelEnclosure;
 
 use base qw(HTML::Microformats::Format_Rel);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Datatype::String qw(isms);

lib/HTML/Microformats/Format/RelLicense.pm

 package HTML::Microformats::Format::RelLicense;
 
 use base qw(HTML::Microformats::Format_Rel);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/RelTag.pm

 package HTML::Microformats::Format::RelTag;
 
 use base qw(HTML::Microformats::Format_Rel);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use CGI::Util qw(unescape);

lib/HTML/Microformats/Format/VoteLinks.pm

 package HTML::Microformats::Format::VoteLinks;
 
 use base qw(HTML::Microformats::Format_Rel);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use CGI::Util qw(unescape);

lib/HTML/Microformats/Format/XFN.pm

 package HTML::Microformats::Format::XFN;
 
 use base qw(HTML::Microformats::Format);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify searchAncestorClass);

lib/HTML/Microformats/Format/XMDP.pm

 package HTML::Microformats::Format::XMDP;
 
 use base qw(HTML::Microformats::Format::XOXO);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/XOXO.pm

 package HTML::Microformats::Format::XOXO;
 
 use base qw(HTML::Microformats::Format);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify xml_stringify);
 
 package HTML::Microformats::Format::XOXO::AbstractList;
 
-use strict;
+use strict; no warnings;
 use 5.010;
 
 sub parse
 package HTML::Microformats::Format::XOXO::DL;
 
 use base qw[HTML::Microformats::Format::XOXO::AbstractList];
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify xml_stringify);
 package HTML::Microformats::Format::XOXO::UL;
 
 use base qw(HTML::Microformats::Format::XOXO::AbstractList);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 1;
 package HTML::Microformats::Format::XOXO::OL;
 
 use base qw(HTML::Microformats::Format::XOXO::AbstractList);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 1;
 
 package HTML::Microformats::Format::XOXO::AbstractListItem;
 
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify xml_stringify);
 package HTML::Microformats::Format::XOXO::LI;
 
 use base qw(HTML::Microformats::Format::XOXO::AbstractListItem);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 1;
 package HTML::Microformats::Format::XOXO::DD;
 
 use base qw(HTML::Microformats::Format::XOXO::AbstractListItem);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 1;

lib/HTML/Microformats/Format/adr.pm

 package HTML::Microformats::Format::adr;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Locale::Country qw(country2code LOCALE_CODE_ALPHA_2);

lib/HTML/Microformats/Format/figure.pm

 package HTML::Microformats::Format::figure;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchClass searchID stringify);

lib/HTML/Microformats/Format/geo.pm

 package HTML::Microformats::Format::geo;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify);

lib/HTML/Microformats/Format/hAlarm.pm

 package HTML::Microformats::Format::hAlarm;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/hAtom.pm

 package HTML::Microformats::Format::hAtom;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchAncestorClass);

lib/HTML/Microformats/Format/hAudio.pm

 package HTML::Microformats::Format::hAudio;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchClass stringify);

lib/HTML/Microformats/Format/hCalendar.pm

 package HTML::Microformats::Format::hCalendar;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchClass searchAncestorClass);

lib/HTML/Microformats/Format/hCard.pm

 package HTML::Microformats::Format::hCard;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Datatype::String;

lib/HTML/Microformats/Format/hCard/TypedField.pm

 package HTML::Microformats::Format::hCard::TypedField;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Format::hCard;

lib/HTML/Microformats/Format/hCard/email.pm

 package HTML::Microformats::Format::hCard::email;
 
 use base qw(HTML::Microformats::Format::hCard::TypedField);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/hCard/impp.pm

 package HTML::Microformats::Format::hCard::impp;
 
 use base qw(HTML::Microformats::Format::hCard::TypedField);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/hCard/label.pm

 package HTML::Microformats::Format::hCard::label;
 
 use base qw(HTML::Microformats::Format::hCard::TypedField);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/hCard/n.pm

 package HTML::Microformats::Format::hCard::n;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Format::hCard;

lib/HTML/Microformats/Format/hCard/org.pm

 package HTML::Microformats::Format::hCard::org;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Format::hCard;

lib/HTML/Microformats/Format/hCard/tel.pm

 package HTML::Microformats::Format::hCard::tel;
 
 use base qw(HTML::Microformats::Format::hCard::TypedField);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/hEntry.pm

 package HTML::Microformats::Format::hEntry;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchClass searchAncestorClass stringify);

lib/HTML/Microformats/Format/hEvent.pm

 package HTML::Microformats::Format::hEvent;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchClass searchRel stringify);

lib/HTML/Microformats/Format/hFreebusy.pm

 package HTML::Microformats::Format::hFreebusy;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchClass stringify);

lib/HTML/Microformats/Format/hListing.pm

 package HTML::Microformats::Format::hListing;
 
 use base qw(HTML::Microformats::Format::hReview);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchClass);

lib/HTML/Microformats/Format/hMeasure.pm

 package HTML::Microformats::Format::hMeasure;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchClass stringify);

lib/HTML/Microformats/Format/hNews.pm

 package HTML::Microformats::Format::hNews;
 
 use base qw(HTML::Microformats::Format::hEntry);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(searchClass);

lib/HTML/Microformats/Format/hProduct.pm

 package HTML::Microformats::Format::hProduct;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/hRecipe.pm

 package HTML::Microformats::Format::hRecipe;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/hResume.pm

 package HTML::Microformats::Format::hResume;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Format/hReview.pm

 package HTML::Microformats::Format::hReview;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify searchClass);

lib/HTML/Microformats/Format/hReview/rating.pm

 package HTML::Microformats::Format::hReview::rating;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify searchClass);

lib/HTML/Microformats/Format/hReviewAggregate.pm

 package HTML::Microformats::Format::hReviewAggregate;
 
 use base qw(HTML::Microformats::Format::hReview);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify searchClass);

lib/HTML/Microformats/Format/hTodo.pm

 package HTML::Microformats::Format::hTodo;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify searchClass);

lib/HTML/Microformats/Format/species.pm

 package HTML::Microformats::Format::species;
 
 use base qw(HTML::Microformats::Format HTML::Microformats::Mixin::Parser);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Datatype::String qw(isms);

lib/HTML/Microformats/Format_Rel.pm

 package HTML::Microformats::Format_Rel;
 
 use base qw(HTML::Microformats::Format);
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(stringify);

lib/HTML/Microformats/Mixin/Parser.pm

 package HTML::Microformats::Mixin::Parser;
 
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use HTML::Microformats::Utilities qw(/^search/);

lib/HTML/Microformats/Mixin/RDF.pm

 package HTML::Microformats::Mixin::RDF;
 
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Encode qw(encode);

lib/HTML/Microformats/ObjectCache.pm

 package HTML::Microformats::ObjectCache;
 
-use strict;
+use strict; no warnings;
 use 5.010;
 
 use Object::AUTHORITY;

lib/HTML/Microformats/Utilities.pm

 package HTML::Microformats::Utilities;
 
 use base qw(Exporter);
-use strict;
+use strict; no warnings;
 use utf8;
 use 5.010;