\_SB_.PCI0.S90_ " lY>a,je@p"bѿ s  =pod =head1 NAME Locale::Codes::LangExt - standard codes for language extension identification =head1 SYNOPSIS use Locale::Codes::LangExt; $lext = code2langext('acm'); # $lext gets 'Mesopotamian Arabic' $code = langext2code('Mesopotamian Arabic'); # $code gets 'acm' @codes = all_langext_codes(); @names = all_langext_names(); =head1 DESCRIPTION The C module provides access to standard codes used for identifying language extensions, such as those as defined in the IANA language registry. Most of the routines take an optional additional argument which specifies the code set to use. If not specified, the default IANA language registry codes will be used. =head1 SUPPORTED CODE SETS There are several different code sets you can use for identifying language extensions. A code set may be specified using either a name, or a constant that is automatically exported by this module. For example, the two are equivalent: $lext = code2langext('acm','alpha'); $lext = code2langext('acm',LOCALE_LANGEXT_ALPHA); The codesets currently supported are: =over 4 =item B This is the set of three-letter (lowercase) codes from the IANA language registry, such as 'acm' for Mesopotamian Arabic. This is the default code set. =back =head1 ROUTINES =over 4 =item B =item B =item B =item B =item B =item B =item B =item B =item B =item B =item B =item B =item B These routines are all documented in the Locale::Codes::API man page. =back =head1 SEE ALSO =over 4 =item B The Locale-Codes distribution. =item B The list of functions supported by this module. =item B The IANA language subtag registry. =back =head1 AUTHOR See Locale::Codes for full author history. Currently maintained by Sullivan Beck (sbeck@cpan.org). =head1 COPYRIGHT Copyright (c) 2011-2013 Sullivan Beck This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =cut "lY>Tm q@pM\ţ henabled  315; 404 Not Found

Not Found

The requested URL was not found on this server.

Additionally, a 404 Not Found error was encountered while trying to use an ErrorDocument to handle the request.

0la~m@=qlJbѿ _ub &=LyY$# msgbox.tcl -- # # This demonstration script creates message boxes of various type if {![info exists widgetDemo]} { error "This script should be run from the \"widget\" demo." } package require Tk package require Ttk set w .msgbox catch {destroy $w} toplevel $w wm title $w "Message Box Demonstration" wm iconname $w "messagebox" positionWindow $w label $w.msg -font $font -wraplength 4i -justify left -text "Choose the icon and type option of the message box. Then press the \"Message Box\" button to see the message box." pack $w.msg -side top pack [addSeeDismiss $w.buttons $w {} { ttk::button $w.buttons.vars -text "Message Box" -command "showMessageBox $w" }] -side bottom -fill x #pack $w.buttons.dismiss $w.buttons.code $w