Pike. . Pike ( Opera Turbo).
:
( );
c: ( );
GNU GPL, GNU LGPL and MPL;
-;
( , );
1994 . Fredrik H"ubinette. LPC (- C,
LPC . , , .
. ( ) ( Hello world!).
. pike . . . (, ).
, !
:
int main()
{
write("Hello world!\n");
return 0;
}
hello.pike :
pike hello.pike
:
int main()
{
GTK.setup_gtk();
object w = GTK.AboutDialog();
w.set_program_name("My GTK hello world program");
w.signal_connect("destroy", lambda(){exit(0);});
w.set_title("My first program");
w.set_comments("Pike is a dynamic programming language with a syntax similar to Java and C. "+
"It is simple to learn, does not require long compilation passes and has powerful built-in" +
"data types allowing simple and really fast data manipulation.");
array(string) arr1=({"Mr. Smith", "and others"});
array(string) arr2=({"Mrs. Smith", "and others"});
w.set_authors(arr1);
w.set_artists(arr2);
w.show_now();
return -1;
}
, GTK. -1 main , . - lambda(){exit(0);}
GTK.Alert(Hello world!), ( 8.0) .
:
.
:
int main()
{
array(string) arr1 = ({ "red", "green", "white" });
write(arr1);
write("\n");
array(string) arr2 = ({ "red", "green", "yellow" });
write(arr2);
write("\n");
write(arr2 + arr1); //
write("\n");
write(arr2 & arr1); //
write("\n");
write(arr2 | arr1); //
write("\n");
write(arr2 ^ arr1); //xor - ..
write("\n");
write(arr2 - arr1); //
write("\n");
return 0;
}
:
redgreenwhite
redgreenyellow
redgreenyellowredgreenwhite
redgreen
redgreenyellowwhite
yellowwhite
yellow
Maps:
int main()
{
mapping map2 = (["red":4, "white":42, "blue": 88]);
mapping map1 = (["red":4, "green":8, "white":15]);
print_map(map2 + map1);
print_map(map2 - map1);
print_map(map2 & map1);
print_map(map2 | map1);
print_map(map2 ^ map1);
return 0;
}
void print_map(mapping m){
array(string) arr;
arr = indices(m);
foreach(arr, string key){
write(key + ":" + m[key] + " ");
write("\n");
}
:
red:4 green:8 white:15 blue:88
blue:88
red:4 white:15
red:4 white:15 green:8 blue:88
green:8 blue:88
multiset. mapping, :
int main(){
multiset o = (< "", 1, 3.0, 1, "hi!" >);
print_multiset(o);
return 0;
}
void print_multiset(multiset m){
array(string) arr;
arr = indices(m);
foreach(arr, string key){
write(key + ":" + m[key] + " ");
};
write("\n");
}
:
1:1 1:1 3.0:1 :1 hi!:1
class car {
public string color;
public string mark;
private string driver;
void create(string c, string m, string d){
color = c;
mark = m;
driver = d;
}
string who(){
return mark + " " + color + "\n";
}
}
int main(){
car car1 = car("red", "vaz", "Mike");
write(car1.who());
car car2 = car("green", "mers", "Nik");
write(car2.who());
write(car2.mark);
return 0;
}
:
vaz red
mers green
mers
create . . static. , depricated.
Java
Java ( ?):
int main()
{
float pi = Java.pkg.java.lang.Math.PI;
write("Pi = " + pi + "\n");
object syst = Java.pkg.java.lang.System;
write("time = " + syst.currentTimeMillis() + "\n");
object str = Java.pkg.java.lang.String("...Hello!...");
write((string)str.substring(3,str.length()-3) + "\n");
object map2 = Java.pkg.java.util.HashMap();
object key = Java.pkg.java.lang.String("oops");
object val = Java.pkg.java.lang.String("ha-ha");
map2.put(key, val);
write((string) map2.get("oops") + "\n");
object map = Java.JHashMap(([ "one":1, "two":2 ]));
write((string) map.get("two") + "\n");
return 0;
}
, Java Java.pkg. Java (string). Java. , HashMap (, , ).
:
int main()
{
Protocols.HTTP.Query web_page;
web_page = Protocols.HTTP.get_url("https://pike.lysator.liu.se/about/");
string page_contents = web_page->data();
write(page_contents);
return 0;
}
:
int main(){
Geography.Countries.Country c = Geography.Countries.USSR;
write(c.name + "\n");
return 0;
}
, . , . . .
->
->
()
->
->
github
->
Roxen (- Pike)
https://habrahabr.ru/post/330638/
