RosettaCodeData/Task/Command-line-arguments/LDPL/command-line-arguments-1.ldpl

DATA:
	argument_count IS NUMBER

PROCEDURE:
	GET LENGTH OF argv IN argument_count
	IF argument_count IS EQUAL TO 0 THEN
		DISPLAY "No arguments!" CRLF
	ELSE
		DISPLAY argv:0 CRLF
	END IF