Search
 
SCRIPT & CODE EXAMPLE
 

PERL

nested haah in perl

# !/usr/bin/perl 
# Perl program to demonstrate 
# Multidimensional hash
  
use strict; 
use warnings;
use Data::Dumper qw(Dumper); 
  
# Creating a 2D hash
my %company = ('Sales' =>    {
                                'Brown' => 'Manager',
                                'Smith' => 'Salesman',
                                'Albert' => 'Salesman', 
                            }, 
            'Marketing' =>  {
                                'Penfold' => 'Designer',
                                'Evans' => 'Tea-person',
                                'Jurgens' => 'Manager', 
                            },
            'Production' => {
                                'Cotton' => 'Paste-up',
                                'Ridgeway' => 'Manager',
                                'Web' => 'Developer', 
                            },
            ); 
  
# Print the List 
print Dumper(\%company);
Comment

nested haah in perl

# !/usr/bin/perl 
# Perl program to demonstrate 
# Multidimensional hash
  
use strict; 
use warnings;
use Data::Dumper qw(Dumper); 
  
# Creating a 2D hash
my %company = ('Sales' =>    {
                                'Brown' => 'Manager',
                                'Smith' => 'Salesman',
                                'Albert' => 'Salesman', 
                            }, 
            'Marketing' =>  {
                                'Penfold' => 'Designer',
                                'Evans' => 'Tea-person',
                                'Jurgens' => 'Manager', 
                            },
            'Production' => {
                                'Cotton' => 'Paste-up',
                                'Ridgeway' => 'Manager',
                                'Web' => 'Developer', 
                            },
            ); 
  
# Print the List 
print Dumper(\%company);
Comment

nested haah in perl

# !/usr/bin/perl 
# Perl program to demonstrate 
# Multidimensional hash
  
use strict; 
use warnings;
use Data::Dumper qw(Dumper); 
  
# Creating a 2D hash
my %company = ('Sales' =>    {
                                'Brown' => 'Manager',
                                'Smith' => 'Salesman',
                                'Albert' => 'Salesman', 
                            }, 
            'Marketing' =>  {
                                'Penfold' => 'Designer',
                                'Evans' => 'Tea-person',
                                'Jurgens' => 'Manager', 
                            },
            'Production' => {
                                'Cotton' => 'Paste-up',
                                'Ridgeway' => 'Manager',
                                'Web' => 'Developer', 
                            },
            ); 
  
# Print the List 
print Dumper(\%company);
Comment

nested haah in perl

# !/usr/bin/perl 
# Perl program to demonstrate 
# Multidimensional hash
  
use strict; 
use warnings;
use Data::Dumper qw(Dumper); 
  
# Creating a 2D hash
my %company = ('Sales' =>    {
                                'Brown' => 'Manager',
                                'Smith' => 'Salesman',
                                'Albert' => 'Salesman', 
                            }, 
            'Marketing' =>  {
                                'Penfold' => 'Designer',
                                'Evans' => 'Tea-person',
                                'Jurgens' => 'Manager', 
                            },
            'Production' => {
                                'Cotton' => 'Paste-up',
                                'Ridgeway' => 'Manager',
                                'Web' => 'Developer', 
                            },
            ); 
  
# Print the List 
print Dumper(\%company);
Comment

nested haah in perl

# !/usr/bin/perl 
# Perl program to demonstrate 
# Multidimensional hash
  
use strict; 
use warnings;
use Data::Dumper qw(Dumper); 
  
# Creating a 2D hash
my %company = ('Sales' =>    {
                                'Brown' => 'Manager',
                                'Smith' => 'Salesman',
                                'Albert' => 'Salesman', 
                            }, 
            'Marketing' =>  {
                                'Penfold' => 'Designer',
                                'Evans' => 'Tea-person',
                                'Jurgens' => 'Manager', 
                            },
            'Production' => {
                                'Cotton' => 'Paste-up',
                                'Ridgeway' => 'Manager',
                                'Web' => 'Developer', 
                            },
            ); 
  
# Print the List 
print Dumper(\%company);
Comment

nested haah in perl

# !/usr/bin/perl 
# Perl program to demonstrate 
# Multidimensional hash
  
use strict; 
use warnings;
use Data::Dumper qw(Dumper); 
  
# Creating a 2D hash
my %company = ('Sales' =>    {
                                'Brown' => 'Manager',
                                'Smith' => 'Salesman',
                                'Albert' => 'Salesman', 
                            }, 
            'Marketing' =>  {
                                'Penfold' => 'Designer',
                                'Evans' => 'Tea-person',
                                'Jurgens' => 'Manager', 
                            },
            'Production' => {
                                'Cotton' => 'Paste-up',
                                'Ridgeway' => 'Manager',
                                'Web' => 'Developer', 
                            },
            ); 
  
# Print the List 
print Dumper(\%company);
Comment

nested haah in perl

# !/usr/bin/perl 
# Perl program to demonstrate 
# Multidimensional hash
  
use strict; 
use warnings;
use Data::Dumper qw(Dumper); 
  
# Creating a 2D hash
my %company = ('Sales' =>    {
                                'Brown' => 'Manager',
                                'Smith' => 'Salesman',
                                'Albert' => 'Salesman', 
                            }, 
            'Marketing' =>  {
                                'Penfold' => 'Designer',
                                'Evans' => 'Tea-person',
                                'Jurgens' => 'Manager', 
                            },
            'Production' => {
                                'Cotton' => 'Paste-up',
                                'Ridgeway' => 'Manager',
                                'Web' => 'Developer', 
                            },
            ); 
  
# Print the List 
print Dumper(\%company);
Comment

nested haah in perl

# !/usr/bin/perl 
# Perl program to demonstrate 
# Multidimensional hash
  
use strict; 
use warnings;
use Data::Dumper qw(Dumper); 
  
# Creating a 2D hash
my %company = ('Sales' =>    {
                                'Brown' => 'Manager',
                                'Smith' => 'Salesman',
                                'Albert' => 'Salesman', 
                            }, 
            'Marketing' =>  {
                                'Penfold' => 'Designer',
                                'Evans' => 'Tea-person',
                                'Jurgens' => 'Manager', 
                            },
            'Production' => {
                                'Cotton' => 'Paste-up',
                                'Ridgeway' => 'Manager',
                                'Web' => 'Developer', 
                            },
            ); 
  
# Print the List 
print Dumper(\%company);
Comment

nested haah in perl

# !/usr/bin/perl 
# Perl program to demonstrate 
# Multidimensional hash
  
use strict; 
use warnings;
use Data::Dumper qw(Dumper); 
  
# Creating a 2D hash
my %company = ('Sales' =>    {
                                'Brown' => 'Manager',
                                'Smith' => 'Salesman',
                                'Albert' => 'Salesman', 
                            }, 
            'Marketing' =>  {
                                'Penfold' => 'Designer',
                                'Evans' => 'Tea-person',
                                'Jurgens' => 'Manager', 
                            },
            'Production' => {
                                'Cotton' => 'Paste-up',
                                'Ridgeway' => 'Manager',
                                'Web' => 'Developer', 
                            },
            ); 
  
# Print the List 
print Dumper(\%company);
Comment

PREVIOUS NEXT
Code Example
Pascal :: take console input in pascal 
Pascal :: pascal press any key to continue 
Pascal :: print in pascal 
Pascal :: delay() in Pascal 
Pascal :: begin in pascal 
Pascal :: pascal area 
Powershell :: Take ownership of a folder 
Powershell :: download jira attachments powershell 
Gdscript :: gdscript for loop 
Gdscript :: godot print enum name 
Abap :: abap integer 
Cobol :: gatsby with yarn 
Assembly :: x86 assembly hello world 
Assembly :: multiply two numbers assembly lmc 
Assembly :: import svg in google slides 
Assembly :: array days of the week 
Javascript :: jquery vslidation remove spaces from input 
Javascript :: map range of numbers to another range 
Javascript :: jest cache clear 
Javascript :: javascript replace spaces with dashes 
Javascript :: import redux thunk 
Javascript :: jquery refresh page 
Javascript :: delete session javascript 
Javascript :: get week day name in javascript 
Javascript :: how to remove checked attribute of checkbox in jquery 
Javascript :: loop array backwards javascript 
Javascript :: generate random whole numbers within a range javascript 
Javascript :: jquery remove and add class 
Javascript :: how to use another port in angular 
Javascript :: How to get current URL with Javascript or React 
ADD CONTENT
Topic
Content
Source link
Name
3+1 =