diff options
author | Nicolas Vigier <boklm@mageia.org> | 2013-04-14 13:46:12 +0000 |
---|---|---|
committer | Nicolas Vigier <boklm@mageia.org> | 2013-04-14 13:46:12 +0000 |
commit | 1be510f9529cb082f802408b472a77d074b394c0 (patch) | |
tree | b175f9d5fcb107576dabc768e7bd04d4a3e491a0 /zarb-ml/mageia-dev/2011-December/010340.html | |
parent | fa5098cf210b23ab4f419913e28af7b1b07dafb2 (diff) | |
download | archives-master.tar archives-master.tar.gz archives-master.tar.bz2 archives-master.tar.xz archives-master.zip |
Diffstat (limited to 'zarb-ml/mageia-dev/2011-December/010340.html')
-rw-r--r-- | zarb-ml/mageia-dev/2011-December/010340.html | 125 |
1 files changed, 125 insertions, 0 deletions
diff --git a/zarb-ml/mageia-dev/2011-December/010340.html b/zarb-ml/mageia-dev/2011-December/010340.html new file mode 100644 index 000000000..962756173 --- /dev/null +++ b/zarb-ml/mageia-dev/2011-December/010340.html @@ -0,0 +1,125 @@ +<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN"> +<HTML> + <HEAD> + <TITLE> [Mageia-dev] [soft-commits] [2359] coding style update (perl_checker) + </TITLE> + <LINK REL="Index" HREF="index.html" > + <LINK REL="made" HREF="mailto:mageia-dev%40mageia.org?Subject=Re%3A%20%5BMageia-dev%5D%20%5Bsoft-commits%5D%20%5B2359%5D%20coding%20style%20update%0A%09%28perl_checker%29&In-Reply-To=%3CCANa9xwsSs8QDB4Bdf1TqSNMf5ud5EKYo-iMHEE8VJ9s-_iUTFg%40mail.gmail.com%3E"> + <META NAME="robots" CONTENT="index,nofollow"> + <META http-equiv="Content-Type" content="text/html; charset=us-ascii"> + <LINK REL="Previous" HREF="010333.html"> + <LINK REL="Next" HREF="010342.html"> + </HEAD> + <BODY BGCOLOR="#ffffff"> + <H1>[Mageia-dev] [soft-commits] [2359] coding style update (perl_checker)</H1> + <B>Romain d'Alverny</B> + <A HREF="mailto:mageia-dev%40mageia.org?Subject=Re%3A%20%5BMageia-dev%5D%20%5Bsoft-commits%5D%20%5B2359%5D%20coding%20style%20update%0A%09%28perl_checker%29&In-Reply-To=%3CCANa9xwsSs8QDB4Bdf1TqSNMf5ud5EKYo-iMHEE8VJ9s-_iUTFg%40mail.gmail.com%3E" + TITLE="[Mageia-dev] [soft-commits] [2359] coding style update (perl_checker)">rdalverny at gmail.com + </A><BR> + <I>Sat Dec 10 20:25:09 CET 2011</I> + <P><UL> + <LI>Previous message: <A HREF="010333.html">[Mageia-dev] [soft-commits] [2359] coding style update (perl_checker) +</A></li> + <LI>Next message: <A HREF="010342.html">[Mageia-dev] [soft-commits] [2359] coding style update (perl_checker) +</A></li> + <LI> <B>Messages sorted by:</B> + <a href="date.html#10340">[ date ]</a> + <a href="thread.html#10340">[ thread ]</a> + <a href="subject.html#10340">[ subject ]</a> + <a href="author.html#10340">[ author ]</a> + </LI> + </UL> + <HR> +<!--beginarticle--> +<PRE>On Sat, Dec 10, 2011 at 18:59, Thierry Vignaud +<<A HREF="https://www.mageia.org/mailman/listinfo/mageia-dev">thierry.vignaud at gmail.com</A>> wrote: +><i> On 10 December 2011 18:29,  <<A HREF="https://www.mageia.org/mailman/listinfo/mageia-dev">root at mageia.org</A>> wrote: +</I>>><i> coding style update (perl_checker) +</I>><i> +</I>><i> uh? Tools.pm doesn't currently pass perl_checker +</I> +Right; but I couldn't see why that was a syntax error at that point +(and the script did work). Anyway, now it looks much better (but for +used modules or "not recognised yet"). + +><i> just do sg like this: +</I>><i> [...] +</I>><i>    if ((@info{qw(name version release variant arch medium build +</I>><i> ext)}) = $name =~ +</I>><i>        m/^(Mageia)-(\d+)-((?:alpha|beta|RC)\d*)?(-(?:.*))?-(i586|x86_64|dual)?(?:-(CD|DVD|BD))?(?:-(build_\w+))?\.(.*)$/) +</I>><i> { +</I>><i>        $info{full} = $name; +</I>><i>    } +</I>><i> [...] +</I> +Looks much more compact, thanks. Added a "else { %info = (); }" to +satisfy the expected behaviour (empty array returned if no match). + +>><i>  open(my $file, "temp_media_on_iso.log") if -r "temp_media_on_iso.log"; +</I>>><i> +</I>>><i>  while ($media = <$file>) { +</I>><i> +</I>><i> just reuse cat_() from MDK::Common (simpler, easier to read) +</I> +Thanks! + +By the way, is there a "best" Web-based doc for MDK Perl libraries? +(could find one, but not at once, and I didn't count many). Or shall +we think about it? +</PRE> + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +<!--endarticle--> + <HR> + <P><UL> + <!--threads--> + <LI>Previous message: <A HREF="010333.html">[Mageia-dev] [soft-commits] [2359] coding style update (perl_checker) +</A></li> + <LI>Next message: <A HREF="010342.html">[Mageia-dev] [soft-commits] [2359] coding style update (perl_checker) +</A></li> + <LI> <B>Messages sorted by:</B> + <a href="date.html#10340">[ date ]</a> + <a href="thread.html#10340">[ thread ]</a> + <a href="subject.html#10340">[ subject ]</a> + <a href="author.html#10340">[ author ]</a> + </LI> + </UL> + +<hr> +<a href="https://www.mageia.org/mailman/listinfo/mageia-dev">More information about the Mageia-dev +mailing list</a><br> +</body></html> |