Perl - Revision history

Hdridder at 13:18, 15 January 2026

2026-01-15T13:18:23Z

← Older revision		Revision as of 13:18, 15 January 2026
Line 17:		Line 17:

	Searching and matching is explained in [[Regular Expressions]].		Searching and matching is explained in [[Regular Expressions]].

			;perl -e '<commands>'
			:Execute <commnands>

	;Print out the contents of $variable in a structured format:		;Print out the contents of $variable in a structured format:

2020-11-12T11:43:11Z

← Older revision		Revision as of 11:43, 12 November 2020
Line 2:		Line 2:
	=Warnings=		=Warnings=
	===Put a ; at the end of each line===		===Put a ; at the end of each line===
			This is still what I forget most.

	===autovivification===		===autovivification===
Line 60:		Line 61:
	;$\|++		;$\|++
	:Set standard output to unbuffered, every is put on screen immediately.		:Set standard output to unbuffered, every is put on screen immediately.

			;$username = getpwuid($<)
			:Get the username of the one executing the script. $< is the uid of the current user.

	==Hashes==		==Hashes==

2020-02-25T14:18:50Z

Arrays

← Older revision		Revision as of 14:18, 25 February 2020
Line 75:		Line 75:
	;a = arr1[-1]		;a = arr1[-1]
	:Last element in arr1		:Last element in arr1

			;if ( grep(/^<value>$/,@arr1) )
			:Check if <value> exist in arr1 (Note the ^ and $ for an exact match

	==Files==		==Files==

2019-11-27T10:02:49Z

Hashes

@@ Line 65: / Line 65: @@
 ;$newhashref = {$oldhasref1,$oldhashref3}
 :Merge 2 hashes, works if all keys are unique
 ==Files==

2019-10-16T11:23:01Z

Files

← Older revision		Revision as of 11:23, 16 October 2019
Line 72:		Line 72:
	;@array = <FH>		;@array = <FH>
	:Read the file opened on FH into @array (1 element per line		:Read the file opened on FH into @array (1 element per line

			;while ( line = (<FH>) )
			:Read the file opened on FH line by line

	==Flow control==		==Flow control==

2019-09-06T10:08:50Z

← Older revision		Revision as of 10:08, 6 September 2019
Line 81:		Line 81:
	;\|\| do {codeblock};		;\|\| do {codeblock};
	:Like die but not exiting the program, use to do additional actions on the failure of the previous command		:Like die but not exiting the program, use to do additional actions on the failure of the previous command

			==Compare==
			;==, !=, >=, >, <, etc
			:Compare numeric data
			;eq, ne, ge, gt, lt, etc
			:Compare strings

2019-06-09T14:03:25Z

2019-05-10T07:10:07Z

← Older revision		Revision as of 07:10, 10 May 2019
Line 53:		Line 53:
	;$output = `a command`		;$output = `a command`
	:Execute the command and return all command output		:Execute the command and return all command output

			;sleep(x)
			:Sleep for x seconds

			;$\|++
			:Set standard output to unbuffered, every is put on screen immediately.

	==Hashes==		==Hashes==

2019-03-12T12:24:30Z

Hashes

← Older revision		Revision as of 12:24, 12 March 2019
Line 56:		Line 56:
	==Hashes==		==Hashes==
	;%newhash = (%oldhas1,%oldhash3)		;%newhash = (%oldhas1,%oldhash3)
	:Merge 2 hashes (works if all keys are unique)		;$newhashref = {$oldhasref1,$oldhashref3}
			:Merge 2 hashes, works if all keys are unique

	==Files==		==Files==

2019-03-12T11:18:21Z

Hashes

← Older revision		Revision as of 11:18, 12 March 2019
Line 56:		Line 56:
	==Hashes==		==Hashes==
	;%newhash = (%oldhas1,%oldhash3)		;%newhash = (%oldhas1,%oldhash3)
	:Merge 2 hashes (works is all keys are unique)		:Merge 2 hashes (works if all keys are unique)

	==Files==		==Files==