Command-line arguments: Difference between revisions
Content added Content deleted
m (typo and small category cleanup) |
(Ada) |
||
Line 6: | Line 6: | ||
myprogram -c "alpha beta" -h "gamma" |
myprogram -c "alpha beta" -h "gamma" |
||
==[[Ada]]== |
|||
[[Category:Ada]] |
|||
Command line arguments are available through the pre-defined package Ada.Command_Line. |
|||
with Ada.Command_line; use Ada.Command_Line; |
|||
with Ada.Text_IO; use Ada.Text_IO |
|||
procedure Print_Commands is |
|||
begin |
|||
-- The number of command line arguments is retrieved from the function Argument_Count |
|||
-- The actual arguments are retrieved from the function Argument |
|||
-- The program name is retrieved from the function Command_Name |
|||
Put(Command_Name & " "); |
|||
for Arg in 1..Argument_Count loop |
|||
Put(Argument(Arg) & " "); |
|||
end loop; |
|||
New_Line; |
|||
end Print_Commands; |
|||
==[[UNIX Shell]]== |
==[[UNIX Shell]]== |
Revision as of 00:32, 14 February 2007
Command-line arguments
You are encouraged to solve this task according to the task description, using any language you may know.
You are encouraged to solve this task according to the task description, using any language you may know.
Retrieve the list of command-line arguments given to the program.
Example command line:
myprogram -c "alpha beta" -h "gamma"
Ada
Command line arguments are available through the pre-defined package Ada.Command_Line.
with Ada.Command_line; use Ada.Command_Line; with Ada.Text_IO; use Ada.Text_IO procedure Print_Commands is begin -- The number of command line arguments is retrieved from the function Argument_Count -- The actual arguments are retrieved from the function Argument -- The program name is retrieved from the function Command_Name Put(Command_Name & " "); for Arg in 1..Argument_Count loop Put(Argument(Arg) & " "); end loop; New_Line; end Print_Commands;
UNIX Shell
sh
To retrieve the entire list of arguments:
WHOLELIST="$@"
To retrieve the second and fifth arguments:
SECOND=$2 FIFTH=$5
Tcl
The pre-defined variable argc contains the number of arguments passed to the routine, argv contains the arguments as a list. Retrieving the second argument might look something like this:
if { $argc > 1 } { puts [lindex $argv 1] }
(Tcl counts from zero, thus [lindex $list 1] retrieves the second item in the list)