cvsuser 02/04/07 11:46:13
Modified: . perlfaq1.pod perlfaq2.pod perlfaq3.pod perlfaq4.pod
perlfaq9.pod
Log:
* tweaks to allow better URL styling in some applications:
+ whitespace around URLs
+ no punctuation immediately following a URL, including parens
Revision Changes Path
1.8 +4 -4 perlfaq/perlfaq1.pod
Index: perlfaq1.pod
===================================================================
RCS file: /cvs/public/perlfaq/perlfaq1.pod,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -w -r1.7 -r1.8
--- perlfaq1.pod 21 Feb 2002 14:49:15 -0000 1.7
+++ perlfaq1.pod 7 Apr 2002 18:46:13 -0000 1.8
@@ -1,6 +1,6 @@
=head1 NAME
-perlfaq1 - General Questions About Perl ($Revision: 1.7 $, $Date: 2002/02/21 14:49:15 $)
+perlfaq1 - General Questions About Perl ($Revision: 1.8 $, $Date: 2002/04/07 18:46:13 $)
=head1 DESCRIPTION
1.10 +4 -4 perlfaq/perlfaq2.pod
Index: perlfaq2.pod
===================================================================
RCS file: /cvs/public/perlfaq/perlfaq2.pod,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -w -r1.9 -r1.10
--- perlfaq2.pod 9 Mar 2002 21:01:13 -0000 1.9
+++ perlfaq2.pod 7 Apr 2002 18:46:13 -0000 1.10
@@ -1,6 +1,6 @@
=head1 NAME
-perlfaq2 - Obtaining and Learning about Perl ($Revision: 1.9 $, $Date: 2002/03/09 21:01:13 $)
+perlfaq2 - Obtaining and Learning about Perl ($Revision: 1.10 $, $Date: 2002/04/07 18:46:13 $)
=head1 DESCRIPTION
@@ -186,7 +186,7 @@
There is also a Usenet gateway to Perl mailing lists sponsored by perl.org at
nntp://nntp.perl.org, or a web interface to the same lists at
http://nntp.perl.org/group/. Other groups are listed at
-http://lists.perl.org.
+http://lists.perl.org/ .
=head2 Where should I post source code?
1.16 +23 -22 perlfaq/perlfaq3.pod
Index: perlfaq3.pod
===================================================================
RCS file: /cvs/public/perlfaq/perlfaq3.pod,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -w -r1.15 -r1.16
--- perlfaq3.pod 11 Feb 2002 19:29:52 -0000 1.15
+++ perlfaq3.pod 7 Apr 2002 18:46:13 -0000 1.16
@@ -1,6 +1,6 @@
=head1 NAME
-perlfaq3 - Programming Tools ($Revision: 1.15 $, $Date: 2002/02/11 19:29:52 $)
+perlfaq3 - Programming Tools ($Revision: 1.16 $, $Date: 2002/04/07 18:46:13 $)
=head1 DESCRIPTION
@@ -285,7 +285,8 @@
=back
For vi lovers in general, Windows or elsewhere:
-http://www.thomer.com/thomer/vi/vi.html.
+
+ http://www.thomer.com/thomer/vi/vi.html
nvi (http://www.bostic.com/vi/, available from CPAN in src/misc/) is
yet another vi clone, unfortunately not available for Windows, but in
1.20 +4 -11 perlfaq/perlfaq4.pod
Index: perlfaq4.pod
===================================================================
RCS file: /cvs/public/perlfaq/perlfaq4.pod,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -w -r1.19 -r1.20
--- perlfaq4.pod 11 Mar 2002 22:15:19 -0000 1.19
+++ perlfaq4.pod 7 Apr 2002 18:46:13 -0000 1.20
@@ -1,6 +1,6 @@
=head1 NAME
-perlfaq4 - Data Manipulation ($Revision: 1.19 $, $Date: 2002/03/11 22:15:19 $)
+perlfaq4 - Data Manipulation ($Revision: 1.20 $, $Date: 2002/04/07 18:46:13 $)
=head1 DESCRIPTION
@@ -1339,24 +1339,17 @@
@shuffled = shuffle(@list);
-If not, you can use this:
+If not, you can use a Fisher-Yates shuffle.
- # fisher_yates_shuffle
- # generate a random permutation of an array in place
- # As in shuffling a deck of cards
- #
sub fisher_yates_shuffle {
my $deck = shift; # $deck is a reference to an array
my $i = @$deck;
- while (--$i) {
+ while ($i--) {
my $j = int rand ($i+1);
@$deck[$i,$j] = @$deck[$j,$i];
}
}
-And here is an example of using it:
-
- #
# shuffle my mpeg collection
#
my @mpeg = <audio/*/*.mp3>;
1.9 +4 -4 perlfaq/perlfaq9.pod
Index: perlfaq9.pod
===================================================================
RCS file: /cvs/public/perlfaq/perlfaq9.pod,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -w -r1.8 -r1.9
--- perlfaq9.pod 2 Apr 2002 04:32:42 -0000 1.8
+++ perlfaq9.pod 7 Apr 2002 18:46:13 -0000 1.9
@@ -1,6 +1,6 @@
=head1 NAME
-perlfaq9 - Networking ($Revision: 1.8 $, $Date: 2002/04/02 04:32:42 $)
+perlfaq9 - Networking ($Revision: 1.9 $, $Date: 2002/04/07 18:46:13 $)
=head1 DESCRIPTION
lmpx.com only provides a reader for public news (NNTP) servers. It is not
affiliated with the servers or forums shown here and is not responsible for
the content of articles, which is written by their respective authors.