AnyEvent example
file: bin/anyevent_example.pl @c3e99e4d 1: #!/usr/bin/env perl 2: use 5.016; 3: use AnyEvent; 4: 5: $| = 1; 6: print "enter your name> "; 7: my $name; 8: my $name_ready = AnyEvent->condvar;
we prompt for some input
STDIN
we use AnyEvent