Select.pm: Add my to synopsis

To scope variables
Perl · Nov 10, 2023 · 890056a · 890056a
1 parent a254546
commit 890056a
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/dist/IO/lib/IO/Select.pm b/dist/IO/lib/IO/Select.pm
@@ -265,20 +265,20 @@ __END__
 
 =head1 NAME
 
-IO::Select - OO interface to the select system call
+IO::Select - OO interface to the C<select> system call
 
 =head1 SYNOPSIS
 
     use IO::Select;
 
-    $s = IO::Select->new();
+    my $s = IO::Select->new();
 
     $s->add(\*STDIN);
     $s->add($some_handle);
 
-    @ready = $s->can_read($timeout);
+    my @ready1 = $s->can_read($timeout);
 
-    @ready = IO::Select->new(@handles)->can_read(0);
+    my @ready2 = IO::Select->new(@handles)->can_read(0);
 
 =head1 DESCRIPTION