Select Code to Download

#!/usr/bin/perl

# This sample shows how POE::Wheel::ReadLine is used to read user
...

    $heap->{readline_wheel}->get("Say Something Else: ");
}