"Hello Ubuntu" in every programming language

[Sera88]

OPL

PROC HelloUbuntu:
  LOCAL Name$(64)
  PRINT "Hi! What's your name?"
  INPUT Name$
  PRINT "Hello+Name$+". Welcome to Ubuntu!"
  GET
ENDP

[descendency]

FLEX

<?xml version="1.0"?>
<mx:Application xmlns:mx="http://www.adobe.com/2006/mxml">
  <mx:HBox>
  	<mx:Label text="Enter Your Name"/>
    <mx:TextInput id="textBox"/>    	
  </mx:HBox>  
  <mx:Button click="mx.controls.Alert.show('Hello, ' + textBox.text, 'Alert Box')" label="Say Hello!"/>
</mx:Application>

[Phenax]

BeFunge

                 v
>v"Hello Ubuntu"0<
,:
^_25*,@

[mouz_forum]

Ruby

#!/usr/bin/ruby
print 'Hi. What\'s your name? '
name = readline
name.chomp!
puts 'Hello, ' + name + '. Welcome to Ubuntu.'

[krzysz00]

QtRuby Qt 4

#!/usr/bin/env ruby
require 'Qt4'

include Qt
class Ubuntu < Qt::Widget
  slots 'mesg()'
  def initialize(parent = nil)
    super()
    @text = Qt::LineEdit.new(tr('Hi. What\'s your name'), self)
    connect(@text, SIGNAL('returnPressed()'), self, SLOT('mesg()'))
    layout = Qt::VBoxLayout.new()
    layout.addWidget(@text)
    setLayout(layout)
  end
  def mesg()
    name = @text.text()
    ret = MessageBox::warning(self, tr("Hi"),
    tr("Hi, "+name+". Welcome to Ubuntu!"),
    MessageBox::Ok | MessageBox::Cancel,
    MessageBox::Ok)
    $qApp::quit()
  end
end

app = Qt::Application.new(ARGV)

widget = Ubuntu.new()
widget.setWindowTitle("Hello Ubuntu")
widget.show()

app.exec()

[snova]

I can't believe nobody has written one in INTERCAL yet! What better language is there? For, say, curing us of our sanity?

I'll leave this honor to somebody of more courage. Or more patience for long, difficult manuals that discuss error messages like 'PROGRAM HAS DISAPPEARED INTO THE BLACK LAGOON' (if that's not where they started).

A "hello, world" program will suffice until somebody with enough nerve figures out how to do it a better way.

DO ,1 <- #13
PLEASE DO ,1SUB#1 <- #234
DO ,1SUB#2 <- #112
DO ,1SUB#3 <- #112
DO ,1SUB#4 <- #0
DO ,1SUB#5 <- #64
DO ,1SUB#6 <- #194
DO ,1SUB#7 <- #48
PLEASE DO ,1SUB#8 <- #22
DO ,1SUB#9 <- #248
DO ,1SUB#10 <- #168
DO ,1SUB#11 <- #24
DO ,1SUB#12 <- #16
DO ,1SUB#13 <- #214
PLEASE READ OUT ,1
PLEASE GIVE UP

I think this might technically violate the rule that the submitted programs be readable.

[bodaciousllama]

MATLAB

When you enter your name you have to enclose it in single quotes or Matlab will assume it is a variable name.

Not anymore.

% helloubuntu.m

name = input('What is your name? : ','s');
greeting = sprintf('Hello, %s! Welcome to Ubuntu!', name);
disp(greeting);

[fiddler616]

TI-BASIC

Input "WHAT'S YOUR     NAME? ",Str1
Disp Str1

can't be run on a computer, but I felt it was a glaring omission.
(btw: tons of spaces so 'name?' doesn't get cut across lines )

Disagreement.

ClrHome
InpSt "Hi! What's your name?", A
Disp "Hello,"
Output(8, 2, A)
Output(1, 3, "Welcome to Ubuntu!"

Note: Use of ClrHome is so that Output cooperates, and use of Output is so that the string can be on the same line. The second Output is because using Disp might've led to double-text/other-problems. Sloppy version:
[CODE]
InpSt "Hi! What's your name?", A
Disp "Hello,",A,"Welcome to Ubuntu!"

[ratmandall]

AutoIt

$name = inputbox("Welcome", "Please enter your name :)")
msgbox(0,"Hello","Welcome "&$name&" to Ubuntu");

JustBasic

input "Please enter your name"; nme$
print "Hello";nme$;"Welcome to ubuntu"

Both windows languages but compilers work well under WINE

[kirsis]

ABAP

REPORT ZHB00001.
WRITE: 'Hello world'.